Foxtable(狐表)用户栏目专家坐堂 → Picturebox(图片框)显示原图问题


  共有1672人关注过本帖树形打印复制链接

主题:Picturebox(图片框)显示原图问题

帅哥哟,离线,有人找我吗?
xvkewen
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:593 积分:5562 威望:0 精华:0 注册:2012/6/29 19:11:00
Picturebox(图片框)显示原图问题  发帖心情 Post By:2017/7/6 14:33:00 [只看该作者]

我的图片是以二进制的形式存储在MS SQL数据库里,再用SQlLoadImage方法从数据库提取图片并用Zoom模式显示在PictureBox里,但是PictureBox尺寸有限,显示的图片是被缩小了的,我想在图片上单击可以显示图片的原始尺寸;怎么做?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By: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


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/7/6 14:46:00 [只看该作者]

方法二:单独做一个窗口,放入pictureBox控件,点击的时候,就打开这个窗口,并把image赋值过去。

 回到顶部
帅哥哟,离线,有人找我吗?
xvkewen
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:593 积分:5562 威望:0 精华:0 注册:2012/6/29 19:11:00
  发帖心情 Post By:2017/7/6 16:18:00 [只看该作者]

有没有办法调出Windows系统上安装的图片查看程序显示呀?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By: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
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:593 积分:5562 威望:0 精华:0 注册:2012/6/29 19:11:00
  发帖心情 Post By:2017/7/6 17:11:00 [只看该作者]

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


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

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By: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
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:593 积分:5562 威望:0 精华:0 注册:2012/6/29 19:11:00
  发帖心情 Post By:2017/7/6 18:25:00 [只看该作者]

好了,谢谢;

 


 回到顶部