Position eines ToolButtons ändern [gelöst]

[zappel]

Hi!

Ich möchte in meine ToolBar einen neuen ToolButton einfügen. Mit dem unten stehenden Code gelingt das. Allerdings wird der ToolButton immer vor die anderen ToolButtons erstellt. Ich möchte seine Position aber so ändern, dass er hinter den schon vorhandenden ToolButtons steht. Die Suche und herumexperimentieren hat mit bis jetzt nicht geholfen. Kann mir jemand Rat geben?

Delphi-Quellcode:

procedure TDEForm.Button1Click(Sender: TObject);
var
  TB: TToolButton;
begin
  TB:=TToolButton.Create(ToolBar1);
  TB.Parent:=ToolBar1;
  TB.Caption:='Punkt 3';
end;

[ibp]

versuchs mal mit...

Delphi-Quellcode:

 ...
 tb.index:=last+1; // in last steht der index des letzten button drin!
 ...

[ibp]

nee das funzt nicht, da index nur abrufbar ist!

aber damit funzt es: gib einfach left einen wert an der nach dem letzten element liegt.

Delphi-Quellcode:

  ..
  tb.left:=50; // 50 ist > als die letzte position!
  ..

[toms]

setzt den Button z.B an 2. Stelle:

Delphi-Quellcode:

 TB.Left:= ToolBar1.Buttons[2].Left;

[zappel]

Danke!

Auf die "simple" Eigenschaft left komme ich natürlich nicht... :roll:

[ibp]

:dp: