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)