Question

delphi7 同一个form每个线程创建一次的方法

具体就是 在unit1中有个treeview的dlbclick事件，unit2里有form2，双击treeview里的每个结点都应该创建一个窗口。。。

Answer 1

其实你的问题我不是很明白，你的意思是说每个 dlbclick 事件都创建一个 Form2 吗？
如果你的问题如上，那么代码是：
Unit1 单元的 Uses 部分加入 Unit2 的的引用；
dlbclick 事件的代码如下：
var
F: TForm2;
begin
F := TForm2.Create(self);
F.Show;
end;

窗体创建后注意关闭时自动释放资源；
Form2 的 OnClose 事件加入以下代码
procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caFree;
end;

追问

我的unit2 里有form2 要写creat方法么

追答

不用

追问

但是我的form2的creat方法很重要怎么办 我的一些form属性要在里面设定啊

追答

form2 的 OnCreate 事件里面，你要是有需要执行的代码当然可以写。
我只是给你说明，实现你提问的解决办法并不必须写，但是你需要的也可以在OnCreate事件写代码的。

追问

窗口的free在哪里加比较好