社区
Delphi
帖子详情
新手请教:如何打开和关闭一个MDI子窗口?谢谢!
pjisfeng
2000-02-28 09:52:00
如题!
...全文
116
3
打赏
收藏
新手请教:如何打开和关闭一个MDI子窗口?谢谢!
如题!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
3 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
supershan
2000-02-28
打赏
举报
回复
Form1为主窗口,Form2为子窗口:
procedure TForm1.Button1Click(Sender: TObject);
begin
form2:=Tform2.create(self);
Form2.Show;
end;
procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action:=Cafree;
end;
sujinfeng
2000-02-28
打赏
举报
回复
1、将Form的FormStyle设为fsMDIChild。
2、假设ChildForm为子窗体名称,在主窗体的“新建字窗体”菜单的OnClick事件中写上“ChildForm:=TChildForm.Create(Self)”语句就可以了。
3、在子窗体的OnClose事件中写上“Action := caFree”语句,此子窗体就可以和普通窗体一样关闭。
注:Delphi的菜单Project-->Opertions,在Form页片中必须将子窗体设为“Available Form”,程序才可通过编译。
AcherMagic
2000-02-28
打赏
举报
回复
还应该在Form2的Destroy中写
Form2 := nil;
CSDN回帖得分大全(近两年)
√vs2005调用dll的时候Initialize()函数返回错误 [VC/MFC 基础类] 40 ylongwu 05-21 20:486 ylongwu06-28 13:42管理√为什么我创建登陆框之后,然后获取登陆框的数据时候总是出现非法操作! [VC/MFC 界面] 40 chencheng8095 05-23 00:2911 xianglitian06-10 11:51管理√CFileFind::FindFile 支持通配符么? [VC/MFC 基础类] 100 wysbk002 05-22
书签备份
Bookmarks 书签菜单 Recently Bookmarked 最近使用的标签 Ubuntu and Free Software links Information and resources about Ubuntu, Debian and Free Software in general Ubuntu
vb/vb.net开发技巧荟萃(九)
VBA如何获取控件句柄? 各位大侠看看我这程序 求解 小白向各位
请教
下VB过滤广告的问题 关于回调函数的问题
新手
请教
ocx文件创建的问题 如何用vb自动填写、选择下拉框选项并提交网页表单?? 如何恢复最大化 如何写外接程序启动路径? 标尺控件 各位大侠帮忙啊,纠结好几天了 如何规定TEXT里面只能输入数字? 悲剧的时钟 各位大侠帮帮忙 这样...
EXCEL常见问题五十问题解答
001。用命令按扭打印一个sheet1中B2:M30区域中的内容?我想在Sheet2中制件一个命令按扭, 打印表Sheet1中的[B2:M30] 区域中的内容?解答:可以将打印区域设为b2:m30,然后打印,如:sheets("sheet1").printarea="b2:m30"sheets("sheet1").printout随手写的,你可以试试看。最简单的方法是:你先 录制宏,在录制宏过程中
vb/vb.net开发精粹(14)
VBA如何获取控件句柄? 各位大侠看看我这程序 求解 小白向各位
请教
下VB过滤广告的问题 关于回调函数的问题
新手
请教
ocx文件创建的问题 如何用vb自动填写、选择下拉框选项并提交网页表单?? 如何恢复最大化 如何写外接程序启动路径? 标尺控件 各位大侠帮忙啊,纠结好几天了 如何规定TEXT里面只能输入数字? 悲剧的时钟 各位大侠帮帮忙 这样的功能在MSHFlexGri
Delphi
5,392
社区成员
262,731
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章