在子窗体里添加控件

Question

用TForm.create(Application);创建了一个子窗体，想在窗体里添加一个Label和一个Button，并在Button里添加事件，不知道该怎么做啊？

Answer 1

procedure MyButtonClick(Sender: TObject);
……
Form1 := TForm.Create(Application);
Label := TLabel.Create(Form1);
Label.Parent := Form1;
Label.Left := ...;
Label.Top  := ...;
Label.Caption := '...';
Button := TButton.Create(Form1);
Button.Left := ...;
Button.Top  := ...;
Button.Width := ...;
Button.Height := ...;
Button.Caption := '...';
Button.OnClick := MyButtonClick;