求助,希望帮忙解决一下。 是这样的,我用一个FORM1作为MAINFORM,然后,我想在FORM1内点击一BUTTON后,能弹出FORM2(FORM2的作用:FORM2内放置一DBLOOKUPLISTBOX,用来存放记录的帮助信息,点击某一行记录后,FORM2再消失),而且,FORM1不能消失,即FORM2,FORM1同时出现,FORM2叠在FORM1之上。当然,FORM2的形状比FORM1小的多。不知,我说得是否清楚,请高手指教.谢谢! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 用mdiform,然后form2的DBLOOKUPLISTBOX的双击事件中(DBCLICK)加入你想要实现的代码! 点Button的时候Form2.ShowModal;点击某一行记录后Form2.ModalResult := mrOK就好了 谢谢snakeguo的建议,似乎是可行的。另:问jwboyr:我只看到有mdiapplication而没看到mdiform? 同Snakeguo(楠) (莫等闲&up2myself 如果两个不是独立的PAS。。那么。。继承一个和FORM1一样子的。。Var Form2:Tform1;beginform2.create(self);form2.height:='你想要的高度。';form2.width:='你想要的宽度';form2.show;end;如果是独立的PAS。那么要在implemetion中加入:uses unit2;//如果你的FORM2是在unit2.pas中的话。。 delphi 如何调试activeForm(在线等) TMS AdvStringGrid可以按照颜色排序不? 如何实现这个查询? 请教如何判断某个键被按下??? 有没有人读过中科院的在职研究生?如何?顺便给分! 请问怎么样实现调用系统默认的电子邮件程序,并在收信人上显预设的一个EMAIL地址 动态库的问题 有谁会做这个工程?重赏!!! 关于创建新控件 菜鸟提问:delphi编译的程序需要什么环境? 为什么会一直移动?当设置filtered=true后呢?? CreateMutex的标志用ReleaseMutex释放不掉呢?
点击某一行记录后Form2.ModalResult := mrOK就好了
另:问jwboyr:我只看到有mdiapplication而没看到mdiform?
那么。。继承一个和FORM1一样子的。。
Var Form2:Tform1;
begin
form2.create(self);
form2.height:='你想要的高度。';
form2.width:='你想要的宽度';
form2.show;
end;
如果是独立的PAS。
那么要在implemetion中加入:
uses unit2;//如果你的FORM2是在unit2.pas中的话。。