Mehrere Icons nebeneinander darstellen

[schwa226]

Hi,

da ich mit Graphik noch nicht viel gemacht habe komme ich nicht weiter!

Ich will so etwas machen wie die Tray Icon Bar (TNA).
Ich habe mehere Icon-Handles die sich aber auch ständig ändern. HIcon zu TIcon wandlen und in einem Image funktioniert schon mal.

Wie stelle ich die am besten auf einer Form dar wenn es nun mehrere Icons sind? Also auch mit Hinzufügen & Entfernen von Icons. Auch sollte das mit der Mouse so funktionieren wie in der Taskbar. D.H. ich muss erkennen über welchen Icon der Mouse Zeiger ist.

Wie gesagt ich habe aber keine Ahnung wie ich das machen könnte!

[Luckie]

Meinst du eventuell eine Toolbar?

[schwa226]

Sowas wie die in der TNA bei Windows. Da sind ja auch rechts die Icon.

Ich möchte so eine Form machen, wo ich die Icons draufkriege.
Die muss aber zur Laufzeit veränderbar sein, da ständig Icons dazu oder wegkommen.

Sowas wie TIconList. Habe aber jetzt nichts gefunden und glaube TIconList ist nicht kostenlos!
http://www.greatis.com/delphicb/bonus/iconlist.html

[toms]

Zitat:

Zitat von schwa226

Sowas wie die in der TNA bei Windows.

Das ist eine Toolbar (ToolbarWindow32)

[schwa226]

Gibt es zu Toolbar ein Sample?

Habe mit Toolbars noch nie gearbeitet.

Wie gesagt ich möchte HIcons darin auflisten.
Brauche eigentlich keine Buttons, nur ein Onclick auf das jeweilige Icon will ich erkennen.
Add, Remove von HIcons sollte gehen.

[turboPASCAL]

Zitat:

möchte HIcons darin auflisten

Du kannst auch normale Icons nemen. HIcons ist das Handle also die Speicheradresse des Icons. ;)

Nimmdoch eine Imagelist und packe die Icons dort hinein.

Zeichnen hannst du diese dann zB. in eine Paintbox oder direct auf einen Canvas.

Oder verwende ein Array ... of TIcon.

[schwa226]

Aus den HIcons kann ich schon TIcons erzeugen. Auf einem Image sehe ich es dann auch.

Habe versucht eine Toolbar zu erstellen, als Image dann die Imagelist die meine TIcons enthält.
Jedoch sehe ich nichts auf der Toolbar.

Wie bringe ich die Toolbar dazu die Icons zu zeichen, wenn sich die Imagelist ändert?

[Andreas L.]

Zitat:

Zitat von schwa226

Aus den HIcons kann ich schon TIcons erzeugen. Auf einem Image sehe ich es dann auch.

Habe versucht eine Toolbar zu erstellen, als Image dann die Imagelist die meine TIcons enthält.
Jedoch sehe ich nichts auf der Toolbar.

Wie bringe ich die Toolbar dazu die Icons zu zeichen, wenn sich die Imagelist ändert?

Du musst der Toolbar TToolButtons hinzufügen (mit einem Rechtsklick auf die Toolbar) und dann den ImageIndex des Buttons anpassen.

[schwa226]

Also kann ich nicht dynamisch ToolButtons hinzufügen, oder?

Dann muss ich mir was anderes suchen...

[Andreas L.]

Zitat:

Zitat von schwa226

Also kann ich nicht dynamisch ToolButtons hinzufügen, oder?

Dann muss ich mir was anderes suchen...

Das geht natürlich auch:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  neuerButton: TToolButton;
begin
  neuerButton := TToolButton.Create(ToolBar1);
  with neuerButton do
  begin
    Caption := 'Beschriftung';
    ImageIndex := 0;
    Parent := ToolBar1;
  end;
end;