怎么使动态添加的ToolButton在ToolBar已有按键的后面？？

[COKING]

哎！越来越搞不懂了！！！

[jishiping]

void __fastcall TForm1::Button1Click(TObject *Sender)
{
TToolButton* Btn = new TToolButton(this);
if (ToolBar1->ButtonCount > 0) {
TToolButton* Btn0 = ToolBar1->Buttons[
ToolBar1->ButtonCount-1];
Btn->Left = Btn0->Left + Btn0->Width;
Btn->Top = Btn0->Top;
}
Btn->Parent = ToolBar1;
//这儿加上 Btn 的其它设定
}

[sczyq]

int ButtonLeft = 0;
for (int i=0; i<SysToolBar->ControlCount;i++)
if (ButtonLeft <= SysToolBar->Controls[i]->Left)
ButtonLeft = SysToolBar->Controls[i]->Left
+ SysToolBar->Controls[i]->Width;

TSpeedButton *NewButton = new TSpeedButton(this);
NewButton ->Parent = SysToolBar;
NewButton ->Top = 2;
NewButton ->Left = ButtonLeft + 1; // 至少加1