Mehrere Icons nebeneinander darstellen

[Andreas L.]

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;