起步软件技术论坛-X3

 找回密码
 立即注册
搜索
查看: 75|回复: 4

【结贴】[问题]继承窗体的onCreate代码顺序问题**

[复制链接]
发表于 2008-6-17 09:24:34 | 显示全部楼层 |阅读模式
做了一个基类,在onCreate里写了一些代码
在子类的onCreate里给类属性赋值或者做其他操作的时候,感觉子类的onCreate事件执行的顺序很混乱,inherited写上写下效果都一样。
回复

使用道具 举报

发表于 2008-6-17 09:36:39 | 显示全部楼层
贴下代码吧
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-6-17 09:45:30 | 显示全部楼层
子类的onCreate事件:

procedure TMAINFORMChild.BizFormCreate(Sender: TObject);
begin
  FlowField:= 'Biz:\OWFSPACE\OWFDB.DATABASE\THEDMASTER.Table\FGUID.Field';      //类属性
  Bind('Biz:\OWFSPACE\JJRJMSQINFO.Info','ZB','APPLYSHEETDOC',['申请部门名称','部门经理','工作环境']);  //此函数用来做一些绑定操作
  Inherited;   //基类onCreate事件会对FlowField进行操作,可FlowField值传不进去。FlowField读写同一个变量FFlowField
end;
回复 支持 反对

使用道具 举报

发表于 2008-6-17 09:53:48 | 显示全部楼层
楼主的代码设计的方面比较多,
可以加些提示信息什么的。我用下面的代码测试,顺序是正常的。
procedure TCT1.BizFormCreate(Sender: TObject);
begin
     Memo1.Lines.Add('基类窗体创建了!');

end;
-----------------------
procedure TCT1Child.BizFormCreate(Sender: TObject);
begin
Memo1.Lines.Add('子类窗体创建了!');
  Inherited;

end;
回复 支持 反对

使用道具 举报

 楼主| 发表于 2008-6-17 10:01:33 | 显示全部楼层
结吧
刚studio报错,重启
这个竟然好了,真神奇
不过我之前加过ShowMsg,好像是先执行的基类的,现在也不能重现了
等有问题再问吧
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Justep Inc.

GMT+8, 2025-7-17 20:29 , Processed in 0.041046 second(s), 15 queries .

Powered by Discuz! X3.4

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表