关于ToolBar的问题

Question

我的Toolbar 和上面的Button都设成autosize了。用ShowCaption来显示和取消文本标签时不正常，ToolBar上的按钮只是宽度缩小了，高度不变，很难看。怎么解决这个问题？

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
begin
   toolbar1.ShowCaptions := not toolbar1.ShowCaptions;
   toolbar1.buttonheigth := ..;
end;

Answer 2

在变换showcaption后手工设置下就可以了

Answer 3

TO 2楼 
  设高度没用的，Toolbar根本不理会你！
To 3楼
  当然了，不然就不用Toolbar了
To 4楼 
  我昏，我指的是在运行的时候