Major Опубликовано 22 января, 2017 Поделиться Опубликовано 22 января, 2017 Под Андроидом вызываю окно запроса так: TDialogService.MessageDialog('Уверены?', TMsgDlgType.mtConfirmation, mbYesNo, TMsgDlgBtn.mbNo, 0, procedure(const AResult: TModalResult) begin if (AResult = mrYes) then ...; end); Но окно такое унылое (черно-белое). Есть ли способ вызывать такие окна с картинками и разными цветами (но без создания отдельной формы)? Цитата Ссылка на комментарий
0 Error Опубликовано 22 января, 2017 Поделиться Опубликовано 22 января, 2017 Вообще стандартные диалоговые окна на то и стандартные, чтобы юзеру привычно было. А если так хочется свои - то да, придется форму создавать. Цитата Ссылка на комментарий
0 Модераторы Равиль Зарипов (ZuBy) Опубликовано 22 января, 2017 Модераторы Поделиться Опубликовано 22 января, 2017 ну вот такая есть штука у меня Спойлер Это нативные окошки пока только под андроид NativeView.zip zairkz, r@di0, AngryOwl и 2 других 5 Цитата Ссылка на комментарий
0 Major Опубликовано 22 января, 2017 Автор Поделиться Опубликовано 22 января, 2017 3 часа назад, Равиль Зарипов (ZuBy) сказал: ну вот такая есть штука у меня Скрыть контент Это нативные окошки пока только под андроид NativeView.zip а что такое "нативные окошки"? я понимаю, что нативный означает родной, но что это означает применительно к Андроиду? Цитата Ссылка на комментарий
0 Модераторы Равиль Зарипов (ZuBy) Опубликовано 22 января, 2017 Модераторы Поделиться Опубликовано 22 января, 2017 Только что, Major сказал: а что такое "нативные окошки"? я понимаю, что нативный означает родной, но что это означает применительно к Андроиду? ну это и есть родные окошки андроида, с родными стилями (Dark, Light) в окошках не используются делфи контролы Major 1 Цитата Ссылка на комментарий
0 Major Опубликовано 20 марта, 2017 Автор Поделиться Опубликовано 20 марта, 2017 (изменено) как вам этот модуль? меня только aNativeView := TNativeView.Create(nil) смущает unit native_message; interface uses FMX.NativeView, FMX.NativeView.Types, FMX.Dialogs; procedure ToguzNative_ShowMessage(MyStr: String); implementation procedure Native_ShowMessage(MessageStr, ProgramName: String); var aNativeView: TNativeView; begin aNativeView := TNativeView.Create(nil); aNativeView.Title := ProgramName; aNativeView.Text := MessageStr; aNativeView.PositiveButtonText := 'OK'; aNativeView.Theme := TNativeViewTheme.Dark; aNativeView.Cancelable := True; if aNativeView.Supported then aNativeView.Show else ShowMessage(MessageStr); end; end. Изменено 20 марта, 2017 пользователем Major Цитата Ссылка на комментарий
0 TTTimon Опубликовано 24 декабря, 2017 Поделиться Опубликовано 24 декабря, 2017 Подскажите, как выровнять текст не по центру а слева/справа и его отступы от краев Цитата Ссылка на комментарий
Вопрос
Major
Под Андроидом вызываю окно запроса так:
TDialogService.MessageDialog('Уверены?', TMsgDlgType.mtConfirmation, mbYesNo, TMsgDlgBtn.mbNo, 0, procedure(const AResult: TModalResult) begin if (AResult = mrYes) then ...; end);
Но окно такое унылое (черно-белое).
Есть ли способ вызывать такие окна с картинками и разными цветами (но без создания отдельной формы)?
Ссылка на комментарий
5 ответов на этот вопрос
Рекомендуемые сообщения
Присоединяйтесь к обсуждению
Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.