MessageDlg mit eigenen Icons

[Helmi]

danke erstmal für die ganzen Tips...

Zitat:

Da war wohl wieder jemand zu faul für die Suche.
Genau dieses Thema hatten wir hier erst vor 2 oder 3 Wochen!

ganz faul war ich aber nicht, da ich danach gesucht habe...

nur leider heissen viele Threads immer anders, obwohl es sich oft um die gleiche Sache handelt
(z. B. Message-Dialog, MessageDlg, ...)!


Trotzdem vielen Dank für die Hilfe

[Sebastian Nintemann]

@Robert: Ich hatte nach MessageDlg gesucht...
@Dani: In Delphi 6 wird ja auch nicht behauptet, dass es verschiedene Versionen der Funktion gibt (siehe OH), aber in Delphi 7... Würd mich ja mal interessieren, warum die overloads nicht funktionieren. Hat Borland vielleicht einfach vergessen die in die Dialogs-Unit zu packen?
Anders gefragt: ist es irgendjemandem mit D7 gelungen eine der überladenen MessageDlg-Funktionen aufzurufen?

Viele Grüße, Sebastian

[Steve]

Zitat von Grotesquery:

Anders gefragt: ist es irgendjemandem mit D7 gelungen eine der überladenen MessageDlg-Funktionen aufzurufen?

Japp, musst nur QDialogs statt Dialogs einbinden

Gruß
Stephan

[Helmi]

Zitat:

Japp, musst nur QDialogs statt Dialogs einbinden

könntest du bitte ein Beispiel posten?

ich schaffs selber ned

[Steve]

Delphi-Quellcode:

USES
 QDialogs, {...}

BEGIN
  MessageDlg('Soll ich?', mtConfirmation, mbYesNoCancel, 0, mbNo);
END;

Aber irgendwie funzt das mit den Rückgabewerten nich so ganz Außerdem sieht der Dialog relativ bescheiden aus

Aber immerhin kann man die überladenen Fkt. aufrunfen

Gruß
Stephan

[nailor]

edit: stuss geschrieben

[Steve]

edit: auf Stuss geantwortet

[nailor]

[ot]lol. der war ja grade mal eine minute online[/ot]

[Helmi]

ich hätt jetzt noch eine Frage:

also das mit den übergeordneten Funktionen aufrufen geht ja jetzt, dank Steve

aber wie kann man jetzt da so ein eigenes Bitmap einbinden?

[nailor]

bei den beiden varianten hier kann man ein TBitmap angeben:

Delphi-Quellcode:

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