Я загрузил пробную версию xe6 и поиграл с образцом под названием веб-браузер. Я хотел бы закрыть приложение с помощью кнопки «Назад»..
это то, что я вставляю в образец
procedure TWebBrowserForm.FormKeyUp(Sender: TObject; var Key: Word;
var KeyChar: Char; Shift: TShiftState);
begin
if Key = vkHardwareBack then
begin
SharedActivity.Finish;
end;
Это работает и закрывает приложение. Но когда я нажимаю ссылку в браузере, а затем нажимаю кнопку «Назад», приложение не закрывается.
Я также пробовал это http://www.fmxexpress.com/virtual-keyboard-with-twebbrowser-on-android-in-delphi-xe5-firemonkey/
TWebBrowser.SetFocus(False)
), а затем снова нажать Назад. - person naXa   schedule 02.05.2014