Hier haste Dein Beispiel:
Delphi-Quellcode:
case Application.MessageBox('Ich bin zu faul, in die Hilfe zu schauen, deshalb lasse ich mir alles von anderen Leuten erledigen.',
'wursthunter', MB_YESNOCANCEL or MB_ICONQUESTION) of
IDYES: ;
IDNO: ;
IDCANCEL: ;
end;
mfG
mirage228