初学Delphi，请教怎样打开多个form的实例？

[wzyun]

rt
最好给出代码？
3Q

[sailer_shi]

form.show;就可以了呀，你是要怎么打开呢，使用Mdi的还是Sdi的？

[IORILI]

关注

[wzyun]

就是在Mdi中打开其他的form的多个实例
另：怎么取得当前路径呢？请问

[vavyboyleon]

说得不太明白，到底什么意思啊
你是说“用同一个窗口类，构建多个实例”吗？
“其他”是指什么？
当前路径APP.Path

[hiflower]

需要动态创建。
with TFormXXX.Create(Self) do
begin
Caption:='...';
Show;
end;

ExtractFilePath(Application.ExeName)

[hahatroy]

form.show

[angle097113]

不太明白你的意思
但是我觉得不是楼上回答的那个意思
难道你是想多打开几个实例 好像没有这个功能
但是你可以打开2个delphi

[pingo888]

我也是同意楼上 angle097113(深思不解) 兄的意见，
不明白你的意思。
打开窗体用form.show;
但是打开多个实例即项目工程的话只能多开个Delphi。

[leilu]

说的明白些吧！

[mengxiang5160]

with TFormxxx.Create(Self) do
begin
Caption:='xxx';
Show;
end;

[hmzgz81]

procedure TfrmNewBackBill.Button1Click(Sender: TObject);
begin
form1.show;
form2.show;
form3.show;
.
.
.

end;

[ghostmaster]

yun~~~

[wzyun]

不好意思
初学
我建了一个Mdi的form1和一个child的form2
我想在form1里面打开多个form2的实例
不知道我这样说对了没有？

[jgw2008]

下面是动态生成窗口的事例：
procedure Tform1.button1Click(Sender:TObject);
begin
Form2:=TForm2.create(self);
Form2.Show;//或是Form2.ShowModal;
end;

[wzyun]

再请问：我用jgw2008(行舟) 的方法打开的form怎么关闭的时候没有关掉，而是最小化了呢？

[wind8bell]

这个关闭变成最小化的问题在论坛里有老帖子，自己搜索一下吧。

[EastBuBai]

你使用的是mdi　还是sdi
是表态创建还是动态创建说清楚点呀

[hiflower]

procedure TForm2.FormClose(...);
begin
Action:=caFree;
end;

[bitsbird]

ExtractFilePath(Application.ExeName)