怎样一次关闭一个父窗体的所有子窗体 怎样一次关闭一个父窗体的所有子窗体 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 代码如下:procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);var I:Integer;begin for I := MDIChildCount-1 downto 0 do MDIChildren[I].Close; Close;end;祝好运! delphi2010下汉字与ASCII码之间的转换问题 高手请注意,有偿回答(人民币4000) 请问如何实现子窗体继承父窗体 请问哪里有 delphi 的 MD5 算法? 我用了很多种GB转成BIG5的方法将简体转成繁体方法。但是在简体操作系统下看起来是繁体的,在繁体操作系统下看起来就是乱码 TBitmap类在线程中释放问题 暂别Delphil论坛!散分了! 继续加分50,还是很简单.总共200分 请问怎么在DELPHI中操作XML文件,哪里有这种资料下载。 请问:怎样在Delphi中打开带有数据库密码的Access数据库? 请问如何得知一张图片的颜色数。比如说是256色还是16位?? 散分
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var
I:Integer;
begin
for I := MDIChildCount-1 downto 0 do
MDIChildren[I].Close;
Close;
end;祝好运!