请教怎样加一个按钮对象Button２
就是按钮Button1的单击事件里定义一个Ｆorm对象。然后创建后的窗体对象的事件怎么来写呢？！还有在上面加具体的按钮对象。如：
procedure TForm1.Button1Click(Sender: TObject);
var
Form2:TForm;
begin
Form2:=TForm.create(nil);
Form2.ShowModal;
end;
就是说怎么样写Ｆorm2的事件呢，还有就是在Ｆorm2上面加一个按钮对象Button２。
菜鸟求救！！！！
procedure TForm1.Button1Click(Sender: TObject);
var
Form2:TForm;
begin
Form2:=TForm.create(nil);
Form2.ShowModal;
end;
就是说怎么样写Ｆorm2的事件呢，还有就是在Ｆorm2上面加一个按钮对象Button２。
菜鸟求救！！！！
