读书人

执行什么语句可以在FORM1下弹出FORM2窗

发布时间: 2012-03-30 17:32:09 作者: rapoo

执行什么语句可以在FORM1下弹出FORM2窗口?
能不能带回FORM2窗口执行结构如ret=0或-1?

[解决办法]
with Tform2.Create(Owner) do
begin
showmodal;
................
Destroy;
end;
[解决办法]
//创建新窗口
if Form2=nil then
begin
Form2:=TForm2.Create(nil);
Form2.ShowModal;
end;

//showModal有返回参数
http://lieren.goofar.com
[解决办法]
with Tform2.Create(Nil) do
begin
ret := showmodal; //
free;
end;

读书人网 >.NET

热点推荐