Controlbar,Toolbar->align := alLeft;  

解决方案 »

  1.   

    Toolbar.DragMode := dmAutomic //忘记了。
    Toolbar.DragKind := dkDock;
      

  2.   

    以上步骤本人也知道,问题是ToolBar怎样变成垂直放置(不在左边出现突起的竖条,应在上面),使上面的SpeedButton为垂直排列,而不是默认的水平排列.
      

  3.   

    Toolbar.Align := alRight;
    Toolbar.AutoSize := true;
    这样按钮就垂直排列了,但有竖条。
      

  4.   

    用TPanel控件,将DockSite属性设为True,其它控件可停靠在其上