delphi 中我想创建form1 然后用按钮来动态创建窗口 if form2=nil then form2:=tform2.create(self) ;

2025-05-02 07:22:04
推荐回答(2个)
回答(1):

form2:=tform2.create(self)
这里form2是个实例名,而tform2是个类名,说明tform2这个类不存在或者包含tform2这个类的单元文件没有引用;
而tform这个类在Forms单元中,系统默认添加的;你可以手动把
interface
uses
......Forms, ......;
这里的Forms,引用去了看看 会报跟你之前一样的错误

回答(2):

tform 是一个form类 可以直接用 而tform2 tform1 这些不能直接使用 如果你要用的话 需要现在头部声明 例如:
type
tform2 = class(tform)
end;

然后你下面才能新建
var form2: tform2;
begin
form2:=tform2.create(self) ;
end;