Message Dialog mit eigenen Buttons

[Jiro]

Hi
Ich möchte gern so ein kleines Fun-Proggi schreiben, bei dem man ganz oft klicken muss, bis es zu Ende ist.
Jetzt möchte ich gerne ein Message Dialog haben, wo ich den Text der Buttons selbst bestimmen kann. Außerdem brauch ich auch ein normales showmessage wo ich den Text des Buttons bestimmen kann.

[olee]

[OT]
[Eigener Senf]

Also wenn ich das Programm (wenns fertig ist) auf meinem PC HÄTTe und es auch laufen WÜRDE dann drücke ich
STRG+ALT+ENTF und schieße es ab!

Soll heißen: Lass so einen Kinderkram das ist einfach nur Zeitverschwendung.

[/Eigener Senf]
[/OT]

Für einen eigenen Message-Dialog musst du einfach nur ein neues Fromular mit Button und so erstellen.
Beim Button kommt ins OnClick:

Delphi-Quellcode:

MyDialogFormular.modalResult := mrOK;

Und Ins hauptformular:

Delphi-Quellcode:

var 
  Dialog: TMyDialogFormular;

//Der Punkt wos aufgerufen werden soll
  Dialog := TMyDialogFormular.Create;
  Dialog.Hide;
  If Dialog.ShowModal=mrOK then [.....]

[jfheins]

http://www.delphipraxis.net/internal...=335248#335248 ;)

Ups, sorry :oops: Anscheinend kann man damit zwar die Button selbst bestimmen, aber nicht den Text sondern nur eine beliebige Kombinatioon der Standard-Buttons :angel2: