【结贴】动态设置查找属性

hdwt · 发表于 2009-9-5 09:18:51

FindBizField('sccj').LookupDef.Kind:=TLookupKind.lkDataValues;
FindBizField('sccj').LookupDef.ValidateKind:=TLookupValidateKind.vkMust; //查找值范围
FindBizField('sccj').LookupDef.SQL.Text:='select sccj from nd_bd_sccj where sblx='''+FieldByName('sblbbm').AsString+'''';
FindBizField('sccj').LookupDef.KeyField:='sccj';
FindBizField('sccj').LookupDef.DisplayField:='sccj';
FindBizField('sccj').LookupDef.DropDownButton:=true;
GetLookupData('sccj').Refresh ;
LayoutChange;

设置代码如上，报如图的错误，请问什么问题呢？

zfang · 发表于 2009-9-5 09:31:26

http://bbs.justep.com/forum.php?mod=viewthread&tid=15925
http://bbs.justep.com/forum.php?mod=viewthread&tid=3719

hdwt · 发表于 2009-9-5 09:45:03

谢谢，结贴

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