社区
Delphi
帖子详情
如何动态建立一个form?
sdyouyun
2003-08-22 09:33:36
在一个unit里建好一个form之后,俺想建一个类,把这个form作为这个类的一个成员
然后用这段代码显示这个窗体
Application.CreateForm(TForm1, Form1);
Form1:=TForm1.Create(nil);
Form1.show;
end;
编译没问题,窗体显示也很正确,可是关闭窗体出错了,关不了,提示00490c4e
哪儿做错了?或者该怎么做?
...全文
37
10
打赏
收藏
如何动态建立一个form?
在一个unit里建好一个form之后,俺想建一个类,把这个form作为这个类的一个成员 然后用这段代码显示这个窗体 Application.CreateForm(TForm1, Form1); Form1:=TForm1.Create(nil); Form1.show; end; 编译没问题,窗体显示也很正确,可是关闭窗体出错了,关不了,提示00490c4e 哪儿做错了?或者该怎么做?
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
10 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
ly_liuyang
2003-08-23
打赏
举报
回复
注意Memory Leak问题呀
tiexinliu
2003-08-23
打赏
举报
回复
这样更好一点,先检查是否存在,不存在则创建
if not Assigned(mainfrm) then mainfrm:=Tmainfrm.Create(application);
mainfrm.showmodal;
WBaby
2003-08-23
打赏
举报
回复
没有释放窗体资源,
try
Application.CreateForm(TForm1, Form1);
Form1:=TForm1.Create(nil);
Form1.show;
finally
Form1.free;
end;
ysycrazy
2003-08-23
打赏
举报
回复
procedure TForm1.Button1Click(Sender: TObject);
var form2:TForm1;
begin
try
form2:=TForm1.Create(Application);
form2.Caption:='This is second form!';
form2.ShowModal;
finally
form2.free;
end;
end;
kingofghost
2003-08-22
打赏
举报
回复
在关闭窗体的时候要把窗体占用的内存全部释放掉,delphi不能自动回收资源的,应该是这样,代码同楼上。
delphi0302
2003-08-22
打赏
举报
回复
var Form1:TForm1;
Form1:=TForm1.Create(application);
Form1.showModal;
在form1.onclose事件中写
begin
Form1:=nil;
Action:=caFree;
end;
wdong18
2003-08-22
打赏
举报
回复
动态建立form就是对话框啊。如果建立了,但是不收回空间会出问题吧。
var Form1:TForm1;
Form1:=TForm1.Create(nil);
if form1.showmodal=mrok then
begin
end;
form1.free;
catty1338
2003-08-22
打赏
举报
回复
你有没有在主程序里uses 那个新建程序
implementation
uses form2;
sdyouyun
2003-08-22
打赏
举报
回复
不行啊
还是出错
yousoft2013
2003-08-22
打赏
举报
回复
var Form1:TForm1;
Form1:=TForm1.Create(nil);
Form1.show;
安全点用这个:
Application.CreateForm(TForm1, Form1);
Form1.show;
EBS
Form
开发
建立
一个
最简单的
Form
并部署到到EBS中(1)
EBS
Form
开发
建立
一个
最简单的
Form
并部署到到EBS中(1) (版权声明,本人原创或者翻译的文章如需转载,如转载用于个人学习,请注明出处;否则请与本人联系,违者必究)1. 从要开发的EBS服务器上,拷贝下来$AU_TOP/
form
s/US/和$AU_TOP/resource/目录下的文件到Windows目录。2. 编辑Windows注册表,把上面的两个目录加入到
FORM
同
一个
页面提交多个
form
表单方法(详细)
办法1.同
一个
页面中
建立
两个表单 各自提交:<
form
action="?" name="
form
1" id="
form
1">
form
> <
form
action="?" name="
form
1" id="
form
1">
form
>办
同一页面多个
form
提交
办法1.同
一个
页面中
建立
两个表单 各自提交: <
form
action="?" name="
form
1" id="
form
1"> <!-- 表单内容 --> <input type="submit" /> </
form
> <
form
action="?" name="
form
1" id="
form
1"> <!-- 表单内容 -...
同
一个
页面提交多个
form
表单方法
办法1.同
一个
页面中
建立
两个表单 各自提交: <
form
action="?" name="
form
1" id="
form
1"> <!-- 表单内容 --> <input type="submit" /> </
form
> <
form
action="?" name="
form
1" id="
form
1"> <!-- 表单内容 --> <input type="submit" /> </
form
> ...
(6)uniGUI for C++ builder下Free
Form
(
动态
窗口)如何使用?
(同
一个
世界,同
一个
梦想,交流学习C++Builder XE10,传承c++builder的魅力!欢迎各地朋友加入我的QQ群484979943、860634510、299497712,进群密码“BCB”,同时也请将该群号广为宣传,希望能够广集各方高手,共同进步。) 本人主笔的国内第一本uniGUI教学资料已诞生,分为cbuilder和delphi两个版本,买代码送手册,需要的朋友可以加入我...
Delphi
5,386
社区成员
262,729
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章