社区
Delphi
帖子详情
这个问题把我难倒了
comecsdn
2003-03-24 04:29:52
在MDI主窗口放置一个按钮cmd1,怎样让它被click后关闭打开的子窗体CForm?
谢谢
...全文
43
12
打赏
收藏
这个问题把我难倒了
在MDI主窗口放置一个按钮cmd1,怎样让它被click后关闭打开的子窗体CForm? 谢谢
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
12 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
citytramper
2003-03-24
打赏
举报
回复
可能是actionlist里面封装了的代码,看不到
comecsdn
2003-03-24
打赏
举报
回复
谢谢大家的回复,可是照着大家说的方法去做,都不行啊,大部分时候会抛出一个异常,这可怎么办? 现在我从delphi里自动生成一个mdi应用程序,想看看他的 文件--〉关闭 菜单的代码是怎么写的,可是也找不到,怎么回事? 文件-关闭文件 的代码在哪? 谢谢
peterzhou2000
2003-03-24
打赏
举报
回复
同意: citytramper(从开始到现在)
dht2003
2003-03-24
打赏
举报
回复
楼上说得有道理!
cjfzy
2003-03-24
打赏
举报
回复
var i:integer;
begin
for i:=0 to mdimain.mdichildcount-1 do
begin
if mdimain.mdichildren[i].name='cform' then mdimain.mdichildren[i].close;
end;
end;
citytramper
2003-03-24
打赏
举报
回复
主窗体有一个字窗体的列表,从列表中找到你要关闭的窗体,再关闭
Magusflp008
2003-03-24
打赏
举报
回复
active:=cafree;
MyCrooner
2003-03-24
打赏
举报
回复
ActiveMDIChild.Close;
chenam
2003-03-24
打赏
举报
回复
帮你up
dancedog
2003-03-24
打赏
举报
回复
上面的都说错了。
在主界面关闭子窗口,一般都不会这样做。
关闭子窗口都在子窗口界面上关闭。
如果你应要在主界面关闭子窗口,那就当打开一个子窗口时,赋窗体的标题给一个变量,
然后根据这个变量关闭子窗口。关闭窗口可以用API函数CloseWindow
haerbin982
2003-03-24
打赏
举报
回复
procedure TForm1.cmd1Click(Sender: TObject);
begin
close;
end;
haerbin982
2003-03-24
打赏
举报
回复
procedure TCForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
if messagedlg('您确定要给haerbin982分吗?如果是这样才可以关才窗体,谢谢!',mtwarning,[mbyes,mbno],0)=mryes then
action:=cafree
else
action:=canone;
end;
谁说Python慢来着?不用Python,这个
问题
难倒
了无数的程序员
围棋是全世界最古老的棋种(没有之一),也是古代哲学思想...标准的围棋盘由横竖各19道线组成网格,共有361个交叉点,每个交叉点上有白子、黑子和无子等三种可能的状态。那么
问题
来了:围棋总共有多少种不同的局面呢?
软件测试面试复盘:技术面没有
难倒
我,hr面却是一把挂
一般提到面试,肯定都会想问一下面试结果,我就大概的说一下面试结果,哈哈,其实不太想说,因为挺惨的,并没有像很多大佬一样 ”已拿字节阿里腾讯各大厂offer”,但是毕竟是自己的经历,无论结果如何都要坦然接受,...
前端面试复盘:vue技术面没有
难倒
我,hr面却是一把挂
陆续面试了几家中小公司,正好借此机会好好恶补一下基础,要是能找到一个合适的工作那就更完美啦。整理了近一次面试复盘笔记,为正在找工作的小伙伴们,提供一丢丢的帮助。祝大家都能找到money多多的工作????????。 ...
python中将一个字典拆分为多个字典
这个
问题
已经把我
难倒
好几天了,记录一下,等我解决了,来写答案。
倒油
问题
详解 (深搜、广搜)(面向过程和面向对象)
题目:有一位厨师要从盛12斤油(a桶)的桶中倒出6斤油来,可是...难就难在,如果直接让三个桶互相倒的话,很容易出现死循环,也就是a倒到b,下一步的时候,有让b倒回到a,所以要防止这种 情况的出现,才能找到结果。解
Delphi
5,387
社区成员
262,729
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章