以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  Picturebox(图片框)显示原图问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=103351)

--  作者:xvkewen
--  发布时间:2017/7/6 14:33:00
--  Picturebox(图片框)显示原图问题
我的图片是以二进制的形式存储在MS SQL数据库里,再用SQlLoadImage方法从数据库提取图片并用Zoom模式显示在PictureBox里,但是PictureBox尺寸有限,显示的图片是被缩小了的,我想在图片上单击可以显示图片的原始尺寸;怎么做?
--  作者:有点甜
--  发布时间:2017/7/6 14:45:00
--  

方法一:Click事件

 

If e.sender.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom Then
    e.sender.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Normal
Else
    e.sender.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
End If


--  作者:有点甜
--  发布时间:2017/7/6 14:46:00
--  
方法二:单独做一个窗口,放入pictureBox控件,点击的时候,就打开这个窗口,并把image赋值过去。
--  作者:xvkewen
--  发布时间:2017/7/6 16:18:00
--  
有没有办法调出Windows系统上安装的图片查看程序显示呀?
--  作者:有点甜
--  发布时间:2017/7/6 16:37:00
--  
以下是引用xvkewen在2017/7/6 16:18:00的发言:
有没有办法调出Windows系统上安装的图片查看程序显示呀?

 

可以

 

e.sender.image.save("d:\\test.jpg")
Dim proc As new Process
proc.File = "d:\\test.jpg"
proc.start

[此贴子已经被作者于2017/7/6 17:18:04编辑过]

--  作者:xvkewen
--  发布时间:2017/7/6 17:11:00
--  

按以上指引做,出现以下错误


图片点击可在新窗口打开查看此主题相关图片如下:ro.jpg
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2017/7/6 17:18:00
--  

改改

 

e.sender.image.save("d:\\test.jpg")
Dim proc As new Process
proc.File = "d:\\test.jpg"
proc.start


--  作者:xvkewen
--  发布时间:2017/7/6 18:25:00
--  

好了,谢谢;