Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Messagebox Pascal Frage! (https://www.delphipraxis.net/20991-messagebox-pascal-frage.html)

Sofa5000 26. Apr 2004 13:40


Messagebox Pascal Frage!
 
Ich habe diesen Code in Pascal. Es ist eine Messagebox mit den Antwortmöglichkeiten Ja und Nein, wobei i ein Integer wert ist! Wie kann ich statt ja und Nein selbst etwas in die Buttons schreiben??

Delphi-Quellcode:
i:=messagebox(0,'Sollen die Zahlen per Zufall generiert werden?','Frage',mb_iconquestion+mb_yesno);
Danke!

Jens Schumann 26. Apr 2004 13:49

Re: Messagebox Pascal Frage!
 
Hallo,
ich denke gar nicht.
Bastel Dir doch aus einem Formular eine eigene MessageBox.

SirThornberry 26. Apr 2004 13:52

Re: Messagebox Pascal Frage!
 
Mit der funktion geht es definitiv nicht da dies bereits die apifunktion ist

Sofa5000 26. Apr 2004 13:55

Re: Messagebox Pascal Frage!
 
Und wie geht dass???

Christian S. 26. Apr 2004 13:58

Re: Messagebox Pascal Frage!
 
Hallo!

Vielleicht hilft Dir das hier weiter.

MfG
Peter

Ghostwalker 26. Apr 2004 13:59

Re: Messagebox Pascal Frage!
 
Nun..einfach ein Forumlar basteln. Wichtig dabei ist die Eigenschaft ModalResult bei den Buttons.


und dann eine Funktion drumrum bauen:

Code:

Function EigenerDialog:Boolean;
var
  DLG : TMeinEigenerDialogMitOkCancel;

begin
  result := FALSE;
  dlg := TMeinEigenerDialogMitOkCancel.Create(Application);
  if (dlg.showmodal = MrOk) then
     result := True
  dlg.free;
end;

SirThornberry 26. Apr 2004 14:01

Re: Messagebox Pascal Frage!
 
gar nicht?! Hätte gedacht das MessageDlg funktioniert - allerdings musst ich feststellen das dies auf keine apifunktion verweist sondern ein Formular erstellt...


Alle Zeitangaben in WEZ +1. Es ist jetzt 15:13 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz