XE5 Firemonkey MessageBox/MessageDlg

[Nils S.]

Hallo zusammen,

ich habe mittlerweile festgestellt, dass es bei Firemonkey keine MessageBox mehr gibt, sondern nur noch den MessageDlg.
Kann man einen MessageDlg irgendwie modal anzeigen?
Oder gibt es eine Alternative?

Hat da jemand eine Idee oder Erfahrung?

[himitsu]

Gbit es da auch noch sowas wie CreateMessageDialog, bzw. MessageDlgIndirect, welches man selber via ShowModal anzeigen kann?

[Bernhard Geyer]

MessageBox ist eine WinAPI-Funktion. Für eine plattformunabhänges Framework/Implementierung ist das ein NoGo.

[Harry Stahl]

Zitat von Nils S.:

Hallo zusammen,
ich habe mittlerweile festgestellt, dass es bei Firemonkey keine MessageBox mehr gibt, sondern nur noch den MessageDlg.
Kann man einen MessageDlg irgendwie modal anzeigen?

Der wird doch modal angezeigt. Beispiel:

Delphi-Quellcode:

 info := 'Wollen Sie die gewählte Rechnung wirklich löschen?';

  if not IsShiftKeyPressed then begin // Wenn Taste Shift gedrückt ist, nicht fragen
    if MessageDlg(info, TMsgDlgType.mtWarning, [TMsgDlgBtn.mbYes,TMsgDlgBtn.mbNo], 0) = mrNo then begin
      exit;
    end;
  end;

[Nils S.]

Danke schonmal für die Rückmeldungen.

Habe jetzt nochmal ein bisschen rum probiert.
Ich erzeuge den MessageDlg bei einem FormShow Ereignis
und habe jetzt beim Testen versehentlich mal zwei Dialoge anzeigen lassen.
Der Erste ist nicht modal, der zweite schon.

Wenn ich einen Dialog durch z.B. ein Click Ereignis erzeuge, dann ist er tatsächlich immer modal.

Kann ich das irgendwie umgehen?

Hintergrund ist, dass ich beim Sarten des Programmes den ConnectionString zu einer Datenbank festlege
und die Property Connected auf True setze.
Klappt das nicht, kommt eine Fehlermeldung und die ist dann nicht modal, weil sie bei dem FormShow Ereignis erzeugt wird.

[Harry Stahl]

Du kannst einen Timer verwenden, der zunächst nicht Enabled ist.

Den setzt Du beim OnShow der Form auf Enabled (wenn erforderlich) und im TimerEvent Disablest Du zuvor den Timer und zeigst dann Deine Nachricht an, die dann modal ist.

[Nils S.]

An sowas in der Art habe ich dann auch gedacht, für ein workaround.
Ich werde das demnächst mal probieren und dann nochmal kurz Kund tun, ob es funktionert hat.

Danke schonmal.

[Nils S.]

Es hat natürlich, wie erwartet, funktioniert.

Danke nochmal.