【搞定】出现错误**

北纬37°7 · 发表于 2008-1-28 11:31:08

我在同一功能下调用子窗口后出现了如图的错误提示

调用代码如下
var
  i:TCT1;
procedure TMainForm.Button1Click(Sender: TObject);
begin
  i:=TCT1.Create(Self.Context);
  i.ShowModal;

Akon · 发表于 2008-1-28 11:55:06

你的TCT1是什么?

lisb · 发表于 2008-1-28 11:55:15

这样写
var
  i:TCT1;
procedure TMainForm.Button1Click(Sender: TObject);
begin
  i:=TCT1.Create(Self.Context);
  try
i.ShowModal;
  finally
i.Free;
  end;

北纬37°7 · 发表于 2008-1-28 13:34:22

TCT1 是子窗口
3楼的写法是应该提倡的
但我想知道为什么会出现这个问题
调出子窗口关闭后就会出现那错误

北纬37°7 · 发表于 2008-1-28 13:55:42

应该是内存释放问题
结贴了

		自动登录	找回密码
密码			立即注册