Einzelnen Beitrag anzeigen

Blechwolf

Registriert seit: 9. Sep 2003
Ort: Aachen
126 Beiträge
 
Delphi 7 Professional
 
#1

mrResult von QDialogs und Dialogs

  Alt 16. Sep 2003, 11:52
Salut,

ich verwende ein paar Sachen aus Qdialogs, und wollte entsprechend auch meinen MessageDlg damit darstellen lassen. normalerweise sollte die folgende Abfrage zu dem gewünschten ergebnis führen:

Delphi-Quellcode:
if QDialogs.MessageDlg('Data will be lost.'+#10+'Continue ?',
                       QDialogs.mtConfirmation,
                       [QDialogs.mbYes,QDialogs.mbNo],0) = mrYes then
  begin
    ShowMessage('Tu dies');
  end
else
  ShowMessage('Tu das');
Aber vollkommen egal, auf welchen Button ich klicke, es wird immer der Else-Zweig ausgeführt.
Speichere ich mir das Result in einer Variablen, und alsse diese Ausgeben, dann bekomme ich als Integerwert die 6 für Yes und die 7 für No. Das entspricht den Konstanten mrAbort(6) und mrRetry(7).

Verwende ich Dialogs statt QDialogs, dann funktioniert das einwandfrei.

Theoretisch kann ich jetzt natürlich einfach beide Units einbinden, aber das ist ja nicht Sinn der Sache oder ?

Grüße Blechwolf
Ein Schiff im Hafen ist sicher. Aber dafür werden Schiffe nicht gebaut. (engl. Sprichwort)
  Mit Zitat antworten Zitat