Delphi如何实现鼠标单击一个按钮弹出一个界面？

2024-12-21 08:28:28

推荐回答（5个）

回答1：

procedure button1click(sender :tobject)
var
myform:tform;
begin
myform:=tform.create(self);
with myform do
begin
width:=500;
height:=400;
left:=200;
top:=150;
caption:='删除窗';
show;
end;
end;

回答2：

form.show显示你要显示的窗体和form.hide 这个是隐藏

回答3：

Application.CreateForm(TCheckOut,CheckOut);
CheckOut.ShowModal;
CheckOut.Free;

回答4：

form2.show 或者showmodal；

回答5：

Form2.show;

最新问答

前期固定资产原值减少了，会计分录怎么做

湖南卫视一起来看流星雨23、24集什么时候播放？

拜托算命师傅帮帮忙，不懂这些，求解。

玻璃有什么特性？

荣誉勋章空降神兵第三关咋过！急

我的e71手机串号359357038672458，邮箱632021329@qq.com，麻烦你也帮忙给我做一个证书好吗？我就几十分了

郭敬明和张爱玲所描述上海的语句最好是能连成一段话。

我在我空间私密留言前女友说看不到好心酸

我想在腾冲挂靠一家旅行社需要怎么做呢？

有哪位童鞋知道请个舞蹈老师是需要多少钱？一般价格在多少钱左右？各种类型舞蹈的收费是一样的吗？