【搞定】自动填充问题**

zygt07 · 发表于 2007-1-16 15:23:44

出现如下错误：
运行功能的时候发生异常：不能将Business.Model.TBizField转换成为Business.Model.TUserDataField
类型：Exception.
不能转换

atiger · 发表于 2007-1-16 15:42:53

你怎么写的，都贴出来看看

zygt07 · 发表于 2007-1-16 15:53:31

var
lUserDataField : TUserDataField;
begin
  DDXX.TRYJBXX(wgDocView.Doc).DataSetBrokerRYJBXX.DataSet.Edit;
DDXX.TRYJBXX(wgDocView.Doc).DataSetBrokerRYJBXX.DataSet.FieldByName('N_GZJB').AsString:=
  DDXX.TDD(ddjlDocView.Doc).dsBroker.DataSet.FieldByName('N_DHGZJB').AsString;    //更新
DDXX.TRYJBXX(wgDocView.Doc).DataSetBrokerRYJBXX.DataSet.post;
DDXX.TRYJBXX(wgDocView.Doc).DataSetBrokerRYJBXX.DataSet.ApplyUpdates;
lUserDataField :=
TSQLDataset(TDDXX(InfoBroker1.Info).DataSetRYDD).bizFieldByName('N_GZJB') as TUserDataField ;
lUserDataField.DataSet.GetLookupData(lUserDataField.ID).Refresh;  //刷新

atiger · 发表于 2007-1-16 16:21:58

TDDXX 这个是啥？编译正常吗？你设置断点跟踪过吗？是那句报出来的，

你把 TSQLDataset(TDDXX(InfoBroker1.Info).DataSetRYDD).bizFieldByName('N_GZJB') as TUserDataField ; 修改为 (InfoBroker1.Info).DataSetRYDD).bizFieldByName('N_GZJB') as TUserDataField ; 看看，

zygt07 · 发表于 2007-1-16 16:54:41

TDDXX是业务信息,
TSQLDataset(TDDXX(InfoBroker1.Info).DataSetRYDD).bizFieldByName('N_GZJB') as TUserDataField 这句报错

atiger · 发表于 2007-1-16 17:24:34

你按我14楼的方法写了吗？运行正常吗？

zygt07 · 发表于 2007-1-16 19:00:24

14楼的方法我试过了不行,都是编译正常执行出错

alang · 发表于 2007-1-17 09:28:04

直接写
lUserDataField := TSQLDataset(TDDXX(InfoBroker1.Info).DataSetRYDD).bizFieldByName('N_GZJB');
去掉 as TXXXField

zygt07 · 发表于 2007-1-17 09:54:27

我觉的原因可能是我在'N_GZJB' 没有设查找属性,我在'N_GZJB'设了查找属性执行成功了不过自动填充中的查找属性的查找数据集还没有刷新,是查找属性中的查找数据集刷新了

alang · 发表于 2007-1-17 10:10:08

你可以在信息中定义一个标准数据集，在自动填充定义查找数据集时候，选择业务数据集，不选择数据查找，关键是定义查找属性上的自动刷新，这样就可以了

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