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 TToolButton eigene Icons? (https://www.delphipraxis.net/118528-ttoolbutton-eigene-icons.html)

sk0r 9. Aug 2008 15:12


TToolButton eigene Icons?
 
Wie kann man eigene Icons zuweisen?
Ich sehe nur, dass man vorgegebene Images per ImageIndex zuweisen kann...

MfG: sk0r

mkinzler 9. Aug 2008 15:14

Re: TToolButton eigene Icons?
 
Die Icons in eine ImageListe ablegen, diese zuweisen und dann Index einstellen

sk0r 9. Aug 2008 15:16

Re: TToolButton eigene Icons?
 
Kannst du mir da ein Beispielcode geben?

taaktaak 9. Aug 2008 15:19

Re: TToolButton eigene Icons?
 
Moin, Moin.
Wieso Beispielcode? Du holst eine ImageList aufs Form, in diese Liste fügst du deine Bitmaps ein. Im OI gibst du dann jedem Toolbutton den passenden Index aus der Liste. Da brauchst du eigentlich keinen Code....

Andreas L. 9. Aug 2008 15:22

Re: TToolButton eigene Icons?
 
ImageList hat die Funktion Add bzw. AddIcon mit der du Bilder der Liste hinzufügen kannst. Ansonsten musst du nur noch den ImageIndex des jeweiligen ToolButtons setzen.

sk0r 9. Aug 2008 15:24

Re: TToolButton eigene Icons?
 
Wo befindet sich denn die ImageList, also in welchem Reiter bei den Komponenten?

taaktaak 9. Aug 2008 15:25

Re: TToolButton eigene Icons?
 
.. das ist aber nur notwendig, wenn du die Bitmaps zur Laufzeit durch das Programm in die Imagelist einfügen willst.

// im Reiter Win32 (bei mir zumindest)

sk0r 9. Aug 2008 15:41

Re: TToolButton eigene Icons?
 
Also, ich habe jetzt eine ImageList hinzugefügt und dort ein Bild eingefügt. Wie komme ich jetzt an die Nummer des Bildes?

Wenn ich jetzt
Delphi-Quellcode:
ToolBar1.Buttons[0].ImageIndex := 0;
in die FormCreate Prozedur hinzufüge, dann passiert gar nichts. :x

taaktaak 9. Aug 2008 15:44

Re: TToolButton eigene Icons?
 
Seltsam! Die Indices stehen in der Liste unterhalb der Bilder, wenn du ein Bild hinzugefügt hast, hat es den Index 0. Vielleicht ist OnCreate() der falsche Zeitpunkt der Zuweisung. Weise den Index doch einfach im OI und nicht im OnCreate() zu, dann müsste es funktionieren

Hawkeye219 9. Aug 2008 16:12

Re: TToolButton eigene Icons?
 
Hallo sk0r,

Markus hat dir in Beitrag #2 drei Schritte aufgezählt. Den mittleren hast du wohl ausgelassen...

Gruß Hawkeye

sk0r 9. Aug 2008 16:22

Re: TToolButton eigene Icons?
 
Zitat:

Zitat von taaktaak
Seltsam! Die Indices stehen in der Liste unterhalb der Bilder, wenn du ein Bild hinzugefügt hast, hat es den Index 0. Vielleicht ist OnCreate() der falsche Zeitpunkt der Zuweisung. Weise den Index doch einfach im OI und nicht im OnCreate() zu, dann müsste es funktionieren

Selbst per Objektinspektor funktioniert es nicht. :|

taaktaak 9. Aug 2008 16:29

Re: TToolButton eigene Icons?
 
Hawkeye hat einen wichtigen Hinweis gegeben! Ist die Imagelist denn der Toolbar zugewiesen?

Bernhard Geyer 9. Aug 2008 16:30

Re: TToolButton eigene Icons?
 
Zitat:

Zitat von sk0r
Selbst per Objektinspektor funktioniert es nicht. :|

Steht im Property Toolbar.Images deine ImageList? Ansonsten gabs mal bei alten S3-Grafikkarten das Problem das Treiberfehler dafür gesorgt haben das Images aus einer ImageList nicht funktionieren. Also wäre ein Treiberupdate mal eine Versuch wert.


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