查询数据时把关联的二进制图片显示在单元格里,如何实现,是一定要把图片下载到本地,再一个个填充到单元表格里去。可不可以直接显示过去。不用一个个下载,再显示。
Dim idd As Integer = e.Table.Current.DataRow("ID号")
Dim dr As DataRow
dr = DataTables("mx").SQLFind("[id] = '" & idd & "'")
If dr IsNot Nothing Then '如果找到的话
Dim logp As WinForm.PictureBox = e.Form.Controls("PictureBox1")
If dr("mjwj") IsNot Nothing Then
logp.Image = dr.SQlLoadImage("mjwj") '从后台提取照片并显示 这样的直接提取显示出来。那就方便了。
Else
logp.Image = Nothing
End If
End If
[此贴子已经被作者于2023/11/2 10:18:27编辑过]
仅适用已经加载的行,改为
dr = DataTables("mx").Find("[id] = '" & idd & "'")
不是。我是想把SQL里存储的二进制图片直接查询时,能显示出来。
如果要在单元格显示,只能下载后到drawcell事件绘制。个人不建议做这种功能,全部都是本地文件还好,还要一边下载一边绘制,会很卡,甚至卡到怀疑人生。