【搞定】[请求]如何捕获表格文档中字段值改变事件**

xhong · 发表于 2007-12-1 15:34:41

如：
XMJBXX.TXMJBXX(dvProjInfo.Doc).FindField('VehicleType').OnChange :=EditMainOnClick;
编译时报错：
　　　没有足够的参数

yancm · 发表于 2007-12-1 15:43:57

您的EditMainOnClick怎么定义的。符合TFieldNotifyEvent = procedure(Sender: TDataField) of Object;
定义吗？

xhong · 发表于 2007-12-4 14:59:52

是这样定义的：
procedure EditMainOnClick(Sender:TObject);

yancm · 发表于 2007-12-4 16:08:39

请按照2楼修改您的定义。

xhong · 发表于 2007-12-5 14:32:57

定义修改为下面这样：
procedure EditMainOnClick(Sender: TDataField);
还是提示没有足够的参数

xhong · 发表于 2007-12-5 16:01:50

不好意思，原因找到了，FindField需要两个参数。
谢谢，结账！

Akon · 发表于 2007-12-5 16:09:07

嗯,好的,谢谢反馈

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