Zitat von
elundril:
warum nicht gleich mit:
Delphi-Quellcode:
begin
case MessageDlg('Magst du Tiere?',mtConfirmation,[mbYes,mbNo,mbAll],0) of
mbYes: Showmessage('Du magst Hunde, stimmts?');
mbNo: Showmessage('Ich auch nicht.');
mbAll: Showmessage('Ein richtiger Tierfreund!');
end;
end;
lg el
Kommt doch aufs gleiche raus? Bis auf dass du auf "mr..." statt auf "mb..." prüfen musst.
