Delphi在Form1中通过一个按钮动态创建窗体Form2 怎么做
3个回答
展开全部
新建了两个窗体form1和form2,在Project->Options里面将form2设置为Available forms,在form1中添加一个button1,运行如下代码:
Uses Unit2; //引用单元文件
procedure TForm1.Button1Click(Sender: TObject);
begin
form2:=TForm2.Create(Application); //创建窗体
form2.Show; //显示窗体
end;
end.
Uses Unit2; //引用单元文件
procedure TForm1.Button1Click(Sender: TObject);
begin
form2:=TForm2.Create(Application); //创建窗体
form2.Show; //显示窗体
end;
end.
展开全部
先声明一个 Form2:=TForm;
然后再按钮事件里面添加 Form2:=TForm.Create(Self);
然后 Form2生成了 在里面干什么自己做吧 比如 from2.width 或者left 什么的 自己要需求来做 哦 对了 要看的话 Form2.show
动态创建应该是这样吧 许久不用有点生疏了 大致没错 你试试看就明白了
然后再按钮事件里面添加 Form2:=TForm.Create(Self);
然后 Form2生成了 在里面干什么自己做吧 比如 from2.width 或者left 什么的 自己要需求来做 哦 对了 要看的话 Form2.show
动态创建应该是这样吧 许久不用有点生疏了 大致没错 你试试看就明白了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
首先要有一个Form2的实例;
按键按下时,form2:=Tform2.create();
就行了
按键按下时,form2:=Tform2.create();
就行了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |