在一个MDI的程序中,如何阻止同一个子窗体多次被打开? 用assign或者用mdichildform.count循环判断MDI的formname中有没有你的目标form 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 for i:=0 to form.midchildcount-1 dobegin if form.midchild[i] is TYourmid then Exit;end; Application.createform(TYourmid,Yourmid); Yourmid.show; if not assigned(form1) then form1:=tform1.create(Self);form1.show; 忘记了一点要在窗体的ondestroy事件里定form1:=nil; 用Remobject传xml的问题 字段的显示问题 通过AdoQuery进行查询后得到的结果,如何使其在DBedit和ComboBox上显示出来? 散分!来者有分.如何用ado动态建库?(access) 我装完cbuilder6,delphi6中的fastreport就不能用了??????显示rtl60.bpl错误 Form Close的问题 如何在窗体中放入图片? 大家都来说远控——经典delphi程序“灰鸽子” 介绍一本DELPHI6的好书吧! 关于lookup字段的一些问题,有些迷糊了//准程序员 下面的设置为什么不正确? 请帮忙?
begin
if form.midchild[i] is TYourmid then
Exit;
end;
Application.createform(TYourmid,Yourmid);
Yourmid.show;
form1:=tform1.create(Self);
form1.show;
要在窗体的ondestroy事件里定
form1:=nil;