Einzelnen Beitrag anzeigen

Benutzerbild von Harry Stahl
Harry Stahl

Registriert seit: 2. Apr 2004
Ort: Bonn
2.479 Beiträge
 
Delphi 11 Alexandria
 
#66

AW: Android L und Delphi = geht nichts mehr ....

  Alt 11. Feb 2015, 23:59
OK, per Google Suche fand ich was im Internet und war wohl auch hier im Forum unter Android MsgDialg-Logik schon ein Thema.

Man muss also den Aufruf nun anders machen:

Delphi-Quellcode:
MessageDlg('Soll die aktuelle Adresse "' + Listview1.Selected.Text + '" tatsächlich gelöscht werden?', System.UITypes.TMsgDlgType.mtWarning,
   [System.UITypes.TMsgDlgBtn.mbYes, System.UITypes.TMsgDlgBtn.mbNo], 0,
   procedure(const AResult: TModalResult)
   begin
     case AResult of
       { Detect which button was pushed and show a different message }
       mrYes: begin
         idx := Listview1.Selected.tag;

         ....
       end;
       mrNo: begin
       // pressed no
       end;
     end;
   end
   );
  Mit Zitat antworten Zitat