-
Постов
24 -
Зарегистрирован
-
Посещение
Весь контент alewka006
-
В приложении на Android 9 не работает браузер. Получаю ошибку ERR_CLEARTEXT_NOT_PERMITTED. Как решить эту проблему?
-
Все получилось. Спасибо!
-
Да AndroidManifest.template.xml
-
Нет. Я в делфи новичок, настроил все как в статье написано.
-
Выложил приложение в маркет на альфа тестирование, API ключ получил, идентификатор отправителя получил. Но сообщения доходят только когда приложение запущено.
-
Все, нашел. Спасибо. Еще такой вопрос. У меня опубликовано приложение без пуш. Пока не обновлю пуш не пойдут или установив apk уже должен получать пуш?
-
Спасибо большое, вечером посмотрю.
-
У меня Делфи 10, я в ней такого пункта не нашел. Сейчас нет под рукой. Там что-то типа Send WAP push есть
-
Почему-то у меня вот эта строчка ADeviceToken := APushService.DeviceTokenValue[ TPushService.TDeviceTokenNames.DeviceToken ]; возвращает ''
-
У меня такая же история на ХЕ7. Ничего не помогает. Не могу подписать приложение. В чем может быть проблема?
- 6 ответов
-
- Provisioning
- Android
-
(и ещё 1 )
C тегом:
-
Я обратил внимание, что если дотронуться до браузера, то системные кнопки перестают работать на всех формах. Как же быть?
-
В примерах в интернете для перемещения назад используют кнопку на форме. Неужели такую элементарную вещь не предусмотрели?
-
Именно так и сделал с самого начала. После первого касания браузера это событие не работает, а у браузера нет такого события
-
Стоит дотронуться браузера и перестает работать
-
unit more; interface uses System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.StdCtrls, FMX.Layouts, FMX.Objects, FMX.WebBrowser, FMX.Platform, FMX.VirtualKeyboard; type TForm5 = class(TForm) Logo: TImage; Layout1: TLayout; WebBrowser1: TWebBrowser; SpeedButton1: TSpeedButton; SpeedButton2: TSpeedButton; procedure FormCreate(Sender: TObject); procedure SpeedButton1Click(Sender: TObject); procedure FormKeyUp(Sender: TObject; var Key: Word; var KeyChar: Char; Shift: TShiftState); private { Private declarations } public { Public declarations } end; var Form5: TForm5; implementation {$R *.fmx} uses main; procedure TForm5.FormCreate(Sender: TObject); begin logo.Width:=Form5.ClientWidth; logo.Height:=Form5.ClientWidth/2.8; WebBrowser1.Width:=Form5.ClientWidth-30; WebBrowser1.Height:=Form5.ClientHeight-30; end; procedure TForm5.FormKeyUp(Sender: TObject; var Key: Word; var KeyChar: Char; Shift: TShiftState); var FService: IFMXVirtualKeyboardService; begin if Key = vkHardwareBack then begin TPlatformServices.Current.SupportsPlatformService (IFMXVirtualKeyboardService, IInterface(FService)); if (FService <> nil) and (TVirtualKeyboardState.Visible in FService.VirtualKeyBoardState) then begin WebBrowser1.Visible:=false; end; end; end; procedure TForm5.SpeedButton1Click(Sender: TObject); begin WebBrowser1.URL:='http://mymobilapp.ru/dostavka.html'; WebBrowser1.Navigate; WebBrowser1.Visible:=True; end; end.
-
Не работает
-
Добрый день. На форме разместил TWebBrowser (Android). Не реагирует на нажатие системной кнопки Назад. Подскажите, пожалуйста, как поймать и обработать нажатие системных кнопок в браузере.
-
Подскажите, пожалуйста. Есть такой код: unit more; interface uses System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.StdCtrls, FMX.Layouts, FMX.Objects, FMX.WebBrowser; type TForm5 = class(TForm) Logo: TImage; Layout1: TLayout; WebBrowser1: TWebBrowser; SpeedButton1: TSpeedButton; SpeedButton2: TSpeedButton; procedure FormCreate(Sender: TObject); procedure SpeedButton1Click(Sender: TObject); procedure FormKeyUp(Sender: TObject; var Key: Word; var KeyChar: Char; Shift: TShiftState); private { Private declarations } public { Public declarations } end; var Form5: TForm5; implementation {$R *.fmx} uses main; procedure TForm5.FormCreate(Sender: TObject); begin logo.Width:=Form5.ClientWidth; logo.Height:=Form5.ClientWidth/2.8; WebBrowser1.Width:=Form5.ClientWidth-30; WebBrowser1.Height:=Form5.ClientHeight-30; end; procedure TForm5.FormKeyUp(Sender: TObject; var Key: Word; var KeyChar: Char; Shift: TShiftState); begin // Обработка аппаратной клавиши "Back" if Key = vkHardwareBack then begin //ваш обработчик поведения WebBrowser1.Visible:=False; Key := 0; // отмена стандартного действия end; end; procedure TForm5.SpeedButton1Click(Sender: TObject); begin WebBrowser1.Visible:=True; end; end. При нажатии на кнопку на экране появляется браузер. При нажатии кнопки Назад на телефоне он скрывается. Но стоит прикоснуться к браузеру и обработчик перестает работать. Что можно сделать чтобы при любом раскладе при нажатии Назад браузер скрывался?
-
Подскажите, как на форме сделать фоновое изображение. Вставляю картинку (TImage) на весь экран, изображение в пропорции выводится не на весь экран