【结】流程填充图片问题**

beidou · 发表于 2009-3-24 11:34:02

邮件已发,请查收

atiger · 发表于 2009-3-24 14:23:04

资源收到了，恢复环境后 CODE 和 AUTO_PK_SUPPORT 这两个表有问题，没有主建，也没有表定义，

另外，我怎么能重现你的问题，说说具体步骤

beidou · 发表于 2009-3-24 15:29:17

流程走到第三步(也就是能显示2个签名的图片)的时候,点保存,然后点一下刷新

atiger · 发表于 2009-3-24 16:42:12

还少表， basic_circs，我随便创建了这样一个表，给了几个代码中用到的字段，
现在运行的效果，见附件

因为不知道你的业务需求，通过跟踪看到 ADataSetBroker.DataSet.FieldByName(SignedList.Values[SignedList.Names]).Clear 这个有清空的字段 XMGLBZYGCSQM、XMJLQM 这两个字段的值，
而图中红色框连接的就是项目经理签名这个字段，这个字段的ID就是 XMJLQM ，不知道楼主情况数据集的这个字段的值的目的是啥

atiger · 发表于 2009-3-24 16:43:59

实际上，直接预览表是能看到这个字段的值的

不知道楼主说的看不到图片，是否是我说的这个地方

如果是，那请检查一下你的逻辑吧。
如果不是，也向我这样截取一些效果图，配上跟踪的关键代码加以说明一下

beidou · 发表于 2009-3-25 08:48:27

对,点完保存然后刷新,图中红色框那个图片就没了

beidou · 发表于 2009-3-25 08:55:22

回复24楼的
      lQuery.CommandText:= 'Select Signed From YUser Where ID = ''' +
                     ADataSetBroker.DataSet.FieldByName(SignedList.Names).AsString+'''';
      lQuery.Open;
      if not lQuery.IsEmpty then
         ADataSetBroker.DataSet.FieldByName(SignedList.Values[SignedList.Names]).Assign(lQuery.Fields[0])
      else
         ADataSetBroker.DataSet.FieldByName(SignedList.Values[SignedList.Names]).Clear;
      lQuery.Close;
这一段代码主要用来确认人员表(YUSER)中是否存在该人

beidou · 发表于 2009-3-25 08:59:31

就算我把
else
ADataSetBroker.DataSet.FieldByName(SignedList.Values[SignedList.Names]).Clear;
这一句注释掉,问题还是重现

atiger · 发表于 2009-3-25 10:37:05

楼主，我这里不会呀，见附件
如果屏蔽了28楼这句显示就正常了，你是否没有编译，或者编译后没有签入，或者签入后没有刷新缓存呢？
      if not lQuery.IsEmpty then
         ADataSetBroker.DataSet.FieldByName(SignedList.Values[SignedList.Names]).Assign(lQuery.Fields[0])
      else
         // ADataSetBroker.DataSet.FieldByName(SignedList.Values[SignedList.Names]).Clear;
      lQuery.Close;

beidou · 发表于 2009-3-25 13:58:40

都有,我还是初始话运行的,然后结果更糟了,先修改那个意见,点保存,刷新一下,在修改一遍,再刷新,两个签名都没了

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