W
ww20000309
Unregistered / Unconfirmed
GUEST, unregistred user!
我新建了一个工程,然后加入了一个原先做好的一个MID窗体。
然后我动态创建这个窗体代码如下:
procedure Tmainform.leibieClick(Sender: TObject);
begin
if not assigned(frmgoodclass) then
begin
frmgoodclass:=tfrmgoodclass.Create(self);
frmgoodclass.Parent:=self;
frmgoodclass.ShowModal;
end;
end;
当我单击显示按钮时报错:
cannot make a visiual window model
然后我动态创建这个窗体代码如下:
procedure Tmainform.leibieClick(Sender: TObject);
begin
if not assigned(frmgoodclass) then
begin
frmgoodclass:=tfrmgoodclass.Create(self);
frmgoodclass.Parent:=self;
frmgoodclass.ShowModal;
end;
end;
当我单击显示按钮时报错:
cannot make a visiual window model