Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - Icons aus Standard TBitBtn herausbekommen


chrissivo - Mi 20.09.06 17:42
Titel: Icons aus Standard TBitBtn herausbekommen
Hallihallo,
habe folgende Frage:
Wenn man bei einem BitButton über Kind eine Eigenschaft einstellt, dann gibt es neben der Aufschrift auch noch ein in Glyph voreingestellten Icon.
Mein Problem ist, dass ich einen BitButton dynamisch erzeugen möchte und dabei auf ein bestimmtes Icon zurückgreifen möchte, ohne die Eigenschaft Kind zu verändern.
Zwar kann ich auf dieses Icon zugreifen indem indem ich einen BitButton zuvor erstelle und mir dort einfach über die Glyph-Eigenschaft das Bild anzeigen lasse und hinterher speicher, doch will ich zur Laufzeit nicht auf eine externe Datei zugreifen müssen.
Wer kann mir helfen? Wo finde ich die Bitmaps/Icons?

Viele Grüße

Chrissi


alzaimar - Mi 20.09.06 18:14

Die müssten in den resourcen deine EXE zu finden sein. Besorg Dir einfach einen Resourcenviewer und finde die ID heraus. Dann kannst Du das Icon einfach aus de EXE-Resource laden (Geht mit LoadIcon oder so).


elundril - Mi 20.09.06 18:20

jep auf www.dsdt.info [http://www.dsdt.info/tipps/?id=459&search=Cursor] wird dargestellt wie man etwas aus *.res ausließt!

*.res datein können mit Borland ImageEditor gemacht werden der beim delphi dabei ist!!

mfg el


alzaimar - Mi 20.09.06 18:45

Nee, das mein ich nicht, hab mal im Sourcecode gespickt:


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
Const
  BitBtnResNames: array[TBitBtnKind] of PChar = (
    nil'BBOK''BBCANCEL''BBHELP''BBYES''BBNO''BBCLOSE',
    'BBABORT''BBRETRY''BBIGNORE''BBALL');
...
Var
  B : TBitmap;

Begin
  B := TBitmap.Create;
  B.LoadFromResourceName(HInstance, BitBtnResNames[MyBtnKind]);
...

Es gibt aber wirklich hübschere Glyphs.


chrissivo - Fr 22.09.06 07:22

Hi alzaimar,
das habe ich gesucht! Danke!