以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于表截图的功能的完善  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=157914)

--  作者:fntfgz
--  发布时间:2020/11/2 15:04:00
--  关于表截图的功能的完善
浏览论坛关于表截图有两种方法
1、http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=157891&replyID=&skin=1
发现这种截图,就是当表中的数据比较多,一屏多的时候就没办法了,这个感觉适应性差一些
2、http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=31163&replyID=&skin=1
代码如下
Dim img As Image = CurrentTable.grid.CreateImage(CurrentTable.TopRow+1, CurrentTable.LeftCol+1, CurrentTable.BottomRow+1, CurrentTable.RightCol+1)
img.Save("d:\\test.png")
Dim Proc As New Process
Proc.File = "d:\\test.png"
Proc.Start():

这种截图效果好,不受数据多少的限制,问题就是需要选中的区域才能截图,但是选中后的美格的美感就没有了,如图

图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20201102144053.png
图片点击可在新窗口打开查看
选中的区域为A区,正常显示的为B区
请问老师,如何选中后仍然和正常的显示效果一样,如上面的B区,也就是从显示效果来看,选中和不选中没啥区别,怎么设置?这样截图下载的效果就比较棒了

[此贴子已经被作者于2020/11/2 15:13:49编辑过]

--  作者:cbt
--  发布时间:2020/11/2 15:17:00
--  
CurrentTable.grid.CreateImage(0, 0, 7, 6) ’这些填写数值即可,不用选中;上左底右
--  作者:fntfgz
--  发布时间:2020/11/2 15:36:00
--  
感谢,确实效果不错