Android アプリを Delphi XE6 の戻るボタンに反応させるにはどうすればよいですか?
uses
FMX.Platform, FMX.VirtualKeyboard;
procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word; var KeyChar: Char; Shift: TShiftState);
begin
if Key = vkHardwareBack then
begin
// Back button pressed...
Key := 0;
end;
end;
上記のコードは機能しません