以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]在窗口中想要显示审核通过字样，按例子怎么做不成呢？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=64410)
--  作者：新福星
--  发布时间：2015/2/13 6:21:00
--  [求助]在窗口中想要显示审核通过字样，按例子怎么做不成呢？

Dim pbx As WinForm.PictureBox = e.Sender
Dim r As Row = Tables("采购备案").Current
If r IsNot Nothing Then
    If r("状态") = "审核通过" Then
        e.File = "审核通过.png" \'显示已审核印章图片
    Else
        e.File = "" \'不显示图片
    End If
Else
    e.File = "" \'不显示图片
End If

 

这是我按照帮助文件中给的例子改写的代码。和原例子唯一不同的是原例中 r("状态")是逻辑列，我这里是字符列。

上述例子实测时，BeforeGetImage这个事件根本就触发不到！在此事件中加入了mes语句不执行。

我具体的用法是按照目录树找到一条记录并显示，想要根据 状态列的值来显示 <审核通过>图片或者不显示。

问题出在哪呢？谢谢！
--  作者：Bin
--  发布时间：2015/2/13 8:28:00
--  
你绑定了列吗?
--  作者：Bin
--  发布时间：2015/2/13 8:30:00
--  
否则是不会自己触发BeforeGetImage的.    或者你到CurrentChanged表事件去 为图片控件的  Image属性赋值

if forms(X).opened then
   forms(X).controls("图片控件").image=getimage("审核通过.png")
end if