Uygulama Kapatırken Uyarı Vermesi

[OmerAsaf]

(01-05-2021, Saat: 11:10)41linea41 Adlı Kullanıcıdan Alıntı:

(01-05-2021, Saat: 00:16)OmerAsaf Adlı Kullanıcıdan Alıntı: Merhabalar,

android uygulamamda program çıkışında uyarı verdirmek istiyorum. aşağıdaki kod windows da sorunsuz çalışıyor. fakat android de uyarı sormuyor bile. 

nerede yanlış yapıyorum veya bu events mi yanlış bu konuda bilgi verebilir misiniz.  

procedure TFormAna.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
var
 msg: String;
begin
 msg := 'Programdan Çıkmak İstiyor Musunuz?';

 if MessageDlg(msg, TMsgDlgType.mtConfirmation,
   [TMsgDlgBtn.mbYes, TMsgDlgBtn.mbNo], 0) = mrNo then
   CanClose := False
 else
   CanClose := True;

end;

İstediğiniz Mobil Uygulama yaşam döngüsüne uygun görünmüyor.

https://www.delphican.com/showthread.php...ya%C5%9Fam
https://www.delphican.com/showthread.php...6#pid21496
https://www.delphican.com/showthread.php...ya%C5%9Fam
https://medium.com/@pelingcinar/android-...219558e99b

İyi çalışmalar.

Merhaba Arkadaşlar,

Öncelikle Cevap için teşekkürler.

41linea41 Önerdiği gibi;
Android uygulamaya yaşam düngüsü kodlarını ekledim. programı açınca - arka plana alınca - arka planda çağırınca olayları görebiliyorum. 
fakat kullanıcıya uyarı verdirme kodunu nerede yazacağımı tam kestiremedim. 

mcuyan 
önerdiği kodu formun onclose koduna yazdım. Fakat işimi görmedi. Geri tuşuna basında uygulama arka plana geçiyor arka plandan çağırınca uyarı yazısı geliyor. Ekran Resimleri Aşağıdadır.

 MessageDlg('Programdan Çıkmak İstiyor Musunuz.?', System.UITypes.TMsgDlgType.mtInformation, [System.UITypes.TMsgDlgBtn.mbYes, System.UITypes.TMsgDlgBtn.mbNo], 0,
    procedure(const AResult: TModalResult)
    begin
      case AResult of
        mrYES:
           begin
            Application.Terminate;
           END;
        mrNo:
          BEGIN
            ;
          END;
      END;
  end);