Foxtable(狐表)用户栏目专家坐堂 → 动态显示不同表内容


  共有1395人关注过本帖树形打印复制链接

主题:动态显示不同表内容

帅哥,在线噢!
有点蓝
  11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107864 积分:548683 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/11/3 17:44:00 [只看该作者]

临时解决方法可以这样试试

表1 的CurrentChanged 事件代码:
If e.Table.Position = -1 OrElse e.Table.Rows.Count = 0 Then Return

SystemReady = False
Dim r As Row = e.Table.Current
Dim PN As String = r("PartNumber")

'先加载表2,再设置图片
Dim WO As String = r("WO")
'工单发料明细更新
DataTables("INI_RMReleaseToWO").LoadFilter = "WO = '" & WO & "'"
DataTables("INI_RMReleaseToWO").Load

Dim Pbx As WinForm.PictureBox = e.Form.Controls("PictureBox1")
Dim fpf As String
Dim fp As String = "P:\General documents\Setup\Pic\" 
fpf = fp & PN & ".jpg" 
If FileSys.FileExists(fpf) = False Then
    fp = "T:\ME\ME Documentation\Picture\" 
    fpf = fp & PN & ".jpg"
    If FileSys.FileExists(fpf) = False Then 
        fpf = "P:\General documents\Setup\Pic\Error.jpg" 
    End If 
End If
pbx.ImageFile = fpf
pbx.SizeMode = ImageSizeMode.Zoom



 回到顶部
帅哥哟,离线,有人找我吗?
creastzh
  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:253 积分:1872 威望:0 精华:0 注册:2023/1/11 7:15:00
  发帖心情 Post By:2023/11/3 17:48:00 [只看该作者]

蓝老师,谢谢!
不过这样的小Bug一般需要多少时间可以解决?会通过什么方式告知?

 回到顶部
帅哥哟,离线,有人找我吗?
creastzh
  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:253 积分:1872 威望:0 精华:0 注册:2023/1/11 7:15:00
  发帖心情 Post By:2023/11/3 18:00:00 [只看该作者]

好的,感谢蓝老师.

想弱弱地问一下,一般这样的小Bug需要多少时间能解决?

 回到顶部
帅哥,在线噢!
有点蓝
  14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107864 积分:548683 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/11/4 8:34:00 [只看该作者]

一般下次更新Foxtable版本的时候会解决。版本更新请留意论坛通知

 回到顶部
总数 14 上一页 1 2