How to close android app in Delphi-XE5 Firemonkey application?

Question

I have this piece of code

procedure TFormMain.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
var
  msg: String;
begin
  msg := 'Do you really want to exit?';

  if MessageDlg(msg, TMsgDlgType.mtConfirmation,
    [TMsgDlgBtn.mbYes, TMsgDlgBtn.mbNo], 0) = mrNo then
    CanClose := False
  else
    CanClose := True; { FIXME: don't want to work on Android }
end;

It works perfectly on Windows. Application closes if I choose 'Yes'. However, application does NOT close on Android. What I am doing wrong?

score 13 · Accepted Answer · answered Oct 08 '13 at 14:11

13

Having the application close when the last form is closed is a Windows thing. An Android app will keep running.

To close the app on Android, call SharedActivity.finish from the FMX.Helpers.Android unit.

answered Oct 08 '13 at 14:11

Marcus Adams

53,009
9
91
143

3

Or the `FMX.TApplication.Terminate()` method, which also finishes the Activity on Android (and does the equivalent action on other platforms). – Remy Lebeau Nov 11 '14 at 19:58
@Remy On `XE7` for me, `Application.Terminate` returns numerous error messages in the IDE when debugging on an android device. – Jerry Dodge Nov 25 '14 at 21:44
@JerryDodge: Such as? – Remy Lebeau Nov 25 '14 at 21:56
@Remy Such as access violations (3 of them) - not seeking help, just a note. Not in front of it at the moment. – Jerry Dodge Nov 25 '14 at 21:58

score 7 · Answer 2 · edited Oct 20 '13 at 09:13

7

uses 
  FMX.Platform.Android;

procedure TForm2.SpeedButton1Click(Sender: TObject); 
begin 
  MainActivity.finish; 
end;

edited Oct 20 '13 at 09:13

kobik

21,001
4
61
121

answered Oct 14 '13 at 03:40

Helios

71
1

score 1 · Answer 3 · answered Mar 03 '14 at 22:33

1

I tried all combinations.

 - SharedActivity.Finish - NOT WORKING FOR ME
 - MainActivity.Finish - NOT WORKING FOR ME
 - Application.MainForm.DisposeOf - NOT WORKING FOR ME

This is works for me :

 FreeAndNil(Application);

answered Mar 03 '14 at 22:33

xJernej

194
2
3
14

2

It's a brutal way to kill your application. – naXa stands with Ukraine Apr 12 '14 at 22:03
Make sure FMX.Platform.Android is properly declared. – Machado Jul 30 '14 at 18:21
Did you try `FMX.Application.Terminate()` yet? – Remy Lebeau Nov 11 '14 at 19:59
Yes, I tried. Not working... Even with Berlin Update 2, apps running in Samsung devices don't close properly. It's annoying... – TiagoTecchio Mar 10 '17 at 14:02

score 0 · Answer 4 · answered Oct 09 '13 at 09:16

0

Calling Halt also closes the application.

answered Oct 09 '13 at 09:16

Oussama Al Rifai

323
1
6
16

1

With Halt, the execution path immediately stops. Your finally in try...finally statements don't get called. Your form's OnClose won't be called, etc. – Marcus Adams Oct 10 '13 at 13:04
Thanks Marcus. By the way, I tried SharedActivity.finish in an application where I use TGuestureManager, it didn't close the application. it is still in the running application list. moreover when I try to activate it it hangs. Am I missing something? When I run it in debugger mode. I get exception in TGuestureManger.Notification proceedure in 1st line. – Oussama Al Rifai Oct 12 '13 at 08:04
Do you have any other activities running? – Marcus Adams Oct 12 '13 at 14:31
I new to android.. I call another window and then I close it... does that mean that it is still open? and if yes, how should I close it? – Oussama Al Rifai Oct 12 '13 at 17:18

How to close android app in Delphi-XE5 Firemonkey application?

4 Answers4

Linked

Related