MessageDlg mit Caption, MSG, 3 Buttons(eigene Caption) usw.

[Thorben86]

Hi, ich möchte gerne ne MessageBox machen, bei der ich folgende eigenschaften haben möchte:

• Will ne Caption vergeben
  Ne Msg angeben
  3 Buttons (mit der Caption ändern, löschen, abbrechen)
  den ändern-Button als standart
  nem eigenen Icon

Ich weis, dass ich "DlgType" den Wert "mtCustom" geben muss.
Aber ich habe keine Ahnung, wie ich dass mit den Buttons machen kann. Wäre nett, wenn mir jemand mal den Aufruf Posten könnte, verzweifel nämlich langsam hier dran.

Delphi-Quellcode:

Hab in der hilfe den Aufbau der Funktion gelesen:

function MessageDlg(
const Caption: WideString;
const Msg: WideString;
DlgType: TMsgDlgType;
Button1, Button2, Button3: TMsgDlgBtn;
HelpCtx: Longint; X, Y: Integer;
DefaultBtn: TMsgDlgBtn = mbNone;
Bitmap: TBitmap = nil
): Integer; overload;

[toms]

Zitat:

function MessageDlg(
const Caption: WideString;
const Msg: WideString;
DlgType: TMsgDlgType;
Button1, Button2, Button3: TMsgDlgBtn;
HelpCtx: Longint; X, Y: Integer;
DefaultBtn: TMsgDlgBtn = mbNone;
Bitmap: TBitmap = nil
): Integer; overload;

Hi,

Verwendest du Kylix? Dies ist glaub dessn Deklaration von MessageDlg .

[Thorben86]

Ne, Delphi 7 Enterprise. Ich habe in der Hilfe jetzt nochmal nachgeguckt. Genau heißt es "MessageDlg (Funktion)"

[toms]

Zitat:

Will ne Caption vergeben
Ne Msg angeben
den ändern-Button als standart
nem eigenen Icon

Lässt sich leicht mit den vorgegebenen Parametern setzen.

Zitat:

3 Buttons (mit der Caption ändern, löschen, abbrechen)

Wird ein wenig schwieriger.
Könntest aber mal hier schauen: http://www.swissdelphicenter.ch/de/showcode.php?id=1241

[NikoMitDaMacht]

Wie soll das mit dem Icon gehen?