Hallo zusammen!
in meinem Projekt soll eine Messagebox mit "Ja" und "Nein" erscheinen, wobei "Nein" schon markiert sein soll.
In der Delphi-Hilfe steht folgendes Beispiel:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
| procedure TForm1.Button1Click(Sender: TObject);
begin
if MessageDlg('Welcome to my Delphi application. Exit now?',
mtConfirmation, [mbYes, mbNo], 0, mbYes) = mrYes then
begin
MessageDlg('Exiting the Delphi application.', mtInformation,
[mbOk], 0, mbOk);
Close;
end;
end; |
Wenn ich das so 1:1 in Kopiere, erscheint die Fehlermeldung "Zu Viele Parameter".
Nehme ich das Markierte raus, klappt alles nur nimmt er dann "Ja" als default.
Wo liegt der Fehler?
bei mir, in der Delphi-Hilfe oder hab ich was vergessen in der Uses-Liste aufzunehmen ? ?
Danke!
Gruß
Torsten
Michael Stenzel
