Foxtable(狐表)用户栏目专家坐堂 → [求助] 【图片】控件如何设置click代码,放大或全屏


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

主题:[求助] 【图片】控件如何设置click代码,放大或全屏

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


加好友 发短信
等级:小狐 帖子:396 积分:3297 威望:0 精华:0 注册:2014/12/13 14:35:00
[求助] 【图片】控件如何设置click代码,放大或全屏  发帖心情 Post By:2014/12/25 10:55:00 [只看该作者]

RT,如何在窗体中的【图片】空间,想设置click事件,目的是点击后图片放大或全屏,再次点击后恢复,【图片浏览器】空间需要显示控制命令,而且命令显示出来有很多,影响使用。

请教,代码如何写?
[此贴子已经被作者于2014-12-25 11:07:59编辑过]

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/12/25 11:00:00 [只看该作者]

2个方案
都在图片控件Click事件中编写代码

1.设置一个全屏的窗口,Click事件打开这个窗口显示图片
2.直接利用Process 打开图片文件

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2014/12/25 11:06:00 [只看该作者]

自己做个窗口也行,加一个按钮,用于最大化和还原按钮。

代码:

If Forms("xxx").BaseForm.WindowState = Windows.Forms.FormWindowState.Maximized Then
     Forms("xxx").BaseForm.WindowState = Windows.Forms.FormWindowState.Normal
Else
    Forms("xxx").BaseForm.WindowState = Windows.Forms.FormWindowState.Maximized
End If

 

至于图片浏览器的命令按钮,是可以统一隐藏的:

http://www.foxtable.com/help/topics/1900.htm

也可以独立设置:

http://www.foxtable.com/help/topics/2286.htm

 

 


 回到顶部