alewka006

В приложении на Android 9 не работает браузер. Получаю ошибку ERR_CLEARTEXT_NOT_PERMITTED. Как решить эту проблему?

Все получилось. Спасибо!

Да AndroidManifest.template.xml

Нет. Я в делфи новичок, настроил все как в статье написано.

Выложил приложение в маркет на альфа тестирование, API ключ получил, идентификатор отправителя получил. Но сообщения доходят только когда приложение запущено.

Все, нашел. Спасибо. Еще такой вопрос. У меня опубликовано приложение без пуш. Пока не обновлю пуш не пойдут или установив apk уже должен получать пуш?

Спасибо большое, вечером посмотрю.

У меня Делфи 10, я в ней такого пункта не нашел. Сейчас нет под рукой. Там что-то типа Send WAP push есть

Да

Почему-то у меня вот эта строчка ADeviceToken := APushService.DeviceTokenValue[ TPushService.TDeviceTokenNames.DeviceToken ]; возвращает ''

У меня такая же история на ХЕ7. Ничего не помогает. Не могу подписать приложение. В чем может быть проблема?

Я обратил внимание, что если дотронуться до браузера, то системные кнопки перестают работать на всех формах. Как же быть?

В примерах в интернете для перемещения назад используют кнопку на форме. Неужели такую элементарную вещь не предусмотрели?

Именно так и сделал с самого начала. После первого касания браузера это событие не работает, а у браузера нет такого события

Стоит дотронуться браузера и перестает работать

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) на весь экран, изображение в пропорции выводится не на весь экран

Может разница в том что я использую Form1.Visible:=false; Form2.Visible:=true;

Спасибо за ответ. Попробую. Без этого обработчика при нажатии кнопки назад у меня приложение закрывается.

Подскажите, пожалуйста, как сделать такие переходы между формами, чтобы при нажатии на Андроиде системной кнопки "Назад" можно было вернуться на предыдущую форму?