Forum: Cross-Platform-Entwicklung
Delphi
by bra,
10. Jun 2016
Die neue Variante wird benötigt, weil es auf den mobilen Plattformen (v.a. Android) keine blockierenden Dialoge gibt. Das führt bei der alten Variante dazu, dass der Code nach dem MessageDlg sofort ausgeführt wird, nachdem der Dialog angezeigt wird, also nie eine sinnvolle Auswertung der gedrückten Buttons stattfinden kann.
Forum: Cross-Platform-Entwicklung
Delphi
by bra,
10. Jun 2016
So in der Art (schnell hingeschrieben, ungetestet):
TDialogService.MessageDialog(Frage, TMsgDlgType.mtConfirmation, mbYesNo, 0,
procedure(const AResult: TModalResult)
begin
if AResult = mrYes then begin
case Command of
0:
begin