以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  图片管理器为啥不能随着表格位置而刷新？（已解决）  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=46955)
--  作者：jimmyhwang
--  发布时间：2014/3/2 0:33:00
--  图片管理器为啥不能随着表格位置而刷新？（已解决）

如题。绑定了表格。之前还好好的。查询表来的。查询框重新输入的时候就能刷新了。奇怪的。哪里设置错了？数据表里图片列设置了储存位置。图片能显示，就是不能刷新。

 

！！！！用照片拍并且动态储存照片的。名称和储存位置都不变。

[此贴子已经被作者于2014-3-3 12:19:05编辑过]
--  作者：lsy
--  发布时间：2014/3/2 8:47:00
--  

例子和图片都传上来，测试一下，到底什么原因。

图片的刷新，好像有点小技巧。
--  作者：jianjingmaoyi
--  发布时间：2014/3/2 10:04:00
--  
应该是存在这个问题,是用代码写存储位置,不能即时显示,上次我发现的
--  作者：jimmyhwang
--  发布时间：2014/3/2 14:49:00
--  
对的。我用代码写了储存位置。并且我把一张图片储存在两个列里。同名的。
--  作者：jimmyhwang
--  发布时间：2014/3/2 23:45:00
--  

还是有问题。。。。

[此贴子已经被作者于2014-3-3 11:28:32编辑过]
--  作者：blackzhu
--  发布时间：2014/3/3 7:55:00
--  
拿上来看看
--  作者：jimmyhwang
--  发布时间：2014/3/3 11:55:00
--  

拍照按钮代码如下，遍历1次，保存一次。然后pictureview始终不刷新。

 

If Result1 = DialogResult.Yes Then
            c.capture() \'开始照相
            For Each r As Row In Tables("查询_Table1").Rows
                r("照片") = r("订单编号") & ".jpg"
            Next
            c.save(ProjectPath & "Parcelimages\\" & Tables("查询_Table1").Current("订单编号") & ".jpg" ) \'保存文件
                    Else If Result1 = DialogResult.No Then
            Return
        End If

[此贴子已经被作者于2014-3-3 11:56:24编辑过]
--  作者：Bin
--  发布时间：2014/3/3 11:59:00
--  
上个例子看看吧
--  作者：jimmyhwang
--  发布时间：2014/3/3 12:19:00
--  

这次真的解决了。重新动态绑定了一次pictureview到table。然后就会刷新了。谢谢大家~

 

Dim Result1 As DialogResult
        Result1 = MessageBox.Show("已经拍过照,是否再拍一次?", "拍照提示", MessageBoxButtons.YesNo, MessageBoxIcon.Information,MessageBoxDefaultButton.Button2)
        If Result1 = DialogResult.Yes Then
            c.capture() \'开始照相
            For Each r As Row In Tables("查询_Table1").Rows
                r("照片") = r("订单编号") & ".jpg"
            Next
            c.save(ProjectPath & "Parcelimages\\" & Tables("查询_Table1").Current("订单编号") & ".jpg" ) \'保存文件                 
 e.Form.controls("ppv").BindingField = "查询_Table1.照片"
 Else If Result1 = DialogResult.No Then
            Return
        End If

[此贴子已经被作者于2014-3-3 12:19:35编辑过]
--  作者：blackzhu
--  发布时间：2014/3/3 12:24:00
--  
重新绑定次?