以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]图片框选后问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=89522)
--  作者：pcxjxjhkw
--  发布时间：2016/8/23 16:59:00
--  [求助]图片框选后问题
对一张图片，用鼠标框选出一个矩形区域，想实现: 1，钜形区域外的部分亮度降低一些，与框选内的形成对比。 2，鼠标移到矩形四边或四角时，可改变矩形框大小。 3，截图。 谢
--  作者：狐狸爸爸
--  发布时间：2016/8/24 8:45:00
--  

http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=52825

 
--  作者：pcxjxjhkw
--  发布时间：2016/8/24 9:45:00
--  
狐爸，没有具体的代码。不知如何解决。
--  作者：Hyphen
--  发布时间：2016/8/24 10:09:00
--  
参考：http://www.foxtable.com/webhelp/scr/1482.htm
--  作者：pcxjxjhkw
--  发布时间：2016/8/24 16:41:00
--  
老师们，这个问题一直未解决。求助大家了，谢
--  作者：大红袍
--  发布时间：2016/8/24 16:47:00
--  

 没必要自己做这个功能，直接用现成的

 

ClipBoard.Clear
Dim proc As new Process
proc.File = ApplicationPath & "/capture.exe"
proc.WaitForClose = True
proc.Start
If ClipBoard.GetImage IsNot Nothing Then
    msgbox("保存到d盘")
    ClipBoard.GetImage.save("d:\\test.jpg")
End If
--  作者：pcxjxjhkw
--  发布时间：2016/8/24 16:49:00
--  
谢，再研究一下。