Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi eigenes Icon in Standarddialogen (https://www.delphipraxis.net/130645-eigenes-icon-standarddialogen.html)

NTcomputer_0 11. Mär 2009 17:55


eigenes Icon in Standarddialogen
 
Hallo!

Ich frage mich gerade, ob es eine einfache Möglichkeit gibt in die Standarddialoge ein eigenes Icon einzubringen.
Kriegt man das mit MessageDlg oder ähnlichem hin oder braucht man dafür einen eigenen Dialog??

ach ja, beinahe vergessen, ich nutze Delphi 2005 PE


(gleicher Post auch im Delphi-Forum)

_BlackDragon_ 12. Mär 2009 17:50

Re: eigenes Icon in Standarddialogen
 
Hi,

jo, das geht. Dafür musst du den Dialog erzeugen, das Icon zuweisen und was du sonst noch brauchst und
dann anzeigen.

Delphi-Quellcode:

procedure TForm1.ShowCustomDialog;
var
  dlg: TForm;
  myIcon: TIcon;
begin
 
  // myIcon erzeugen und Bild laden
  myIcon := TIcon.Create;
  try
    myIcon.LoadFromFile('C:\icon\myIcon.bmp'); // bin mir nicht sicher obs auch für bmp's funzt

    dlg := CreateMessageDialog('', mtCustom, [mbYes], mbYes); // oder was auch immer du brauchst.
    try
      dlg.Icon := myIcon;
      dlg.ShowModal;
    finally
      FreeAndNil(dlg);
    end;
  finally
    FreeAndNil(myIcon);
  end;
end;
Das ist nur hingekleckert und ungetestet, soll ja auch nur den ungefären Ablauf erklären.

Weitere Infos findest du in der Hilfe "CreateMessageDialog" und in der Unit Dialogs, welche du übrigens auch einbinden musst. :wink:

Gruss

BlackDragon

NTcomputer_0 12. Mär 2009 18:28

Re: eigenes Icon in Standarddialogen
 
danke für deine antwort!
habe es aber nicht probiert, da im andren forum mir schon jemand geholfen hat..
(hast du ja gesehen :) )
da gabs noch ein paar einstellungen mehr die ganz nützlich waren

nuclearping 12. Mär 2009 18:46

Re: eigenes Icon in Standarddialogen
 
Tjoa, hätteste deinen Cross-Post angegeben, hätte sich hier jemand die Mühe sparen können.

API 12. Mär 2009 18:54

Re: eigenes Icon in Standarddialogen
 
Zitat:

Zitat von NTcomputer_0
da im andren forum mir schon jemand geholfen hat..

Dieser jemand ist ein Mod von diesem Forum ;)
Link zum Cross-Post:
http://www.delphi-forum.de/viewtopic...=553510#553510


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:51 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