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.