Android MessageDlg

[Sir Rufo]

Probierst du bitte einmal folgendes aus?

Delphi-Quellcode:

procedure TForm1.Button1Click( Sender: TObject );
begin
  MessageDlg( 
    'Augen öffnen?', 
    TMsgDlgType.mtConfirmation, 
    [ TMsgDlgBtn.mbYes, TMsgDlgBtn.mbNo ], 
    0, 
    TMsgDlgBtn.mbNo, 
    procedure ( const AResult: TModalResult )
    begin
      Button1.Text := IntToStr( AResult );
    end );
end;

• Was passiert, wenn du neben den Dialog klickst?
• Was passiert, wenn du die Back-Taste drückst?
• Glaubst du immer noch, dass der Dialog weiterlebt?

Bei mir bekomme ich in beiden Fällen im Button ein -1 angezeigt.

PS
Dieses Verhalten ist so nur bei Android zu finden! Weil dieses Verhalten auf der Plattform normal ist. Bei allen anderen Plattformen (OSX, iOS, Windows) muss man auf irgendeinen Button des Dialogs drücken, damit dieser verschwindet und dadurch ist AResult immer >= 0 ... nur bei Android ist der Wert >= -1.

[greenmile]

Danke für die Antwort und die Eklärung (geht doch ). Ich teste das gleich mal.

[Sir Rufo]

Zitat von greenmile:

Danke für die Antwort und die Eklärung (geht doch ). Ich teste das gleich mal.

Ich hoffe ja mal, du verstehst jetzt das Übungsblatt.

Ersetze Annahmen durch Gewissheit (Debugger, einfache Ausgabe der Werte)

[greenmile]

Installiere eben noch das Update 1, das fehlte doch.

[greenmile]

Kurzes Update: Delphi 10 und schon klappt alles. Danke.