现在我在form1上添加2个按钮
分别添加事件
procedure TForm1.BitBtn1Click(Sender: TObject);
var
form2:tform;
begin
form2:=tform2.create(nil);
form2.Show;
end;
procedure TForm1.BitBtn2Click(Sender: TObject);
var
form2:tform2;
begin
form2.hide;
end;
我按bitbtn2结果form1没有了 form2还有啊？
