FormCreate 中的语句不被执行

hiya_data 2013-06-22 12:53:33
昨天,在编写程序时,发现一个 FormCreate 中的语句没有被执行,类的初始化不能完成,出现 access violation 错误。后来,在 FormCreate 中加入了一个无关的语句,这个 FormCrete 才被执行,程序运行正常。今天,又遇到类似的问题。昨天的老办法不行,重启 Delphi 不行,重启电脑也不行。诚请大师指点。

程序具体如下:

type
TfrmVariable = class(TfrmEditBase)
procedure FormCreate(Sender: TObject);
......

procedure TfrmVariable.FormCreate(Sender: TObject);
begin
inherited;
MyVarList := TDefVarList.Create;
MyVarList.Assign(ETest.Variable);
MyVarList.MaxUndo := 1024;
EList := @MyVarList;
end;

在调试中,没有看到FormCreate 内的语句被执行。
...全文
124 2 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
hiya_data 2013-06-22
  • 打赏
  • 举报
回复
终于试出来了。 把 TfrmEditBase.FormCreate 写进一句注释,问题就解决了。 但是,为什么?

5,928

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧