控件动态生成的问题，高手请进

Question

需要在Form上动态生成一个TTreeView(Align=alLeft),一个TSplitter和一个TPanel(Align=alClient)控件，从左到右依次排列，但是每次动态生成后，TSplitter控件总是跑到最左边。
请高手指点！

Answer 1

var
  Form1: TForm1;
  myTree: TTreeView;
  mySplitter: TSplitter;
  myPanel: TPanel;implementation{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);
begin
 myTree:=TTreeView.Create(Form1);
 myTree.Parent:=Form1;
 myTree.Align:=alLeft;
 mySplitter:=TSplitter.Create(Form1);
 mySplitter.Parent:=Form1;
 mySplitter.Left:=myTree.Width; //其实只要加上这一句就行了
 mySplitter.Align:=myTree.Align;
 myPanel:=TPanel.Create(Form1);
 myPanel.Parent:=Form1;
 myPanel.Align:=alClient;
end;