标题：单元格显示图片

1楼

creastzh 发表于：2024/1/7 20:20:00

以前使用VBA在Excel中将图片直接调用显示在文件中, 这样方便查看,一览无余, 图片不大,一般只有100k大小,现在我将相关数据转入了foxtable, 但发现只能使用窗口方式才能显示, 我希望仍能使用类似Excel一样将图片直接显示在Foxtable页面上, 不知道如何操作, 谢谢!

2楼

有点蓝 发表于：2024/1/7 20:23:00

3楼

creastzh 发表于：2024/1/7 20:33:00

是的, 我仔细学习一下,谢谢!

4楼

creastzh 发表于：2024/1/7 21:12:00

老师,我还是没有琢磨出来,能否请给我发一个案例, 我不是要在单元格画图,而是要在单元格显示指定的图片,谢谢!

5楼

creastzh 发表于：2024/1/7 21:14:00

就像这个状态,类似Excel图片显示在Foxtable单元格中

6楼

有点蓝 发表于：2024/1/7 21:36:00

要在单元格显示指定的图片Foxtable只能通过绘制的方式实现

7楼

creastzh 发表于：2024/1/7 21:47:00

我刚才根据搜索到的1篇文章终于试验出来了

此主题相关图片如下：2024-01-07 21_46_26-dragfilewindowtitle.jpg

8楼

creastzh 发表于：2024/1/7 21:49:00

确实如您所说,我使用DrawCell事件完成了图片绘制,感谢您的提示.

e.StartDraw

'Dim img As Image = GetImage(ProjectPath & e.Row("_Identify") & ".jpg"

If e.Row.IsNull("第一列") = False Then

'MessageBox.Show( e.Row("第一列"))

Dim img As Image = GetImage( e.Row("第一列"))

e.Graphics.DrawImage(img, e.x, e.y, e.Width, e.Height)

End If

e.EndDraw

共8 条记录, 每页显示 10 条, 页签: [1]