以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助] 【图片】控件如何设置click代码,放大或全屏  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=62089)

--  作者:13865161910
--  发布时间:2014/12/25 10:55:00
--  [求助] 【图片】控件如何设置click代码,放大或全屏
RT,如何在窗体中的【图片】空间,想设置click事件,目的是点击后图片放大或全屏,再次点击后恢复,【图片浏览器】空间需要显示控制命令,而且命令显示出来有很多,影响使用。

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

--  作者:Bin
--  发布时间:2014/12/25 11:00:00
--  
2个方案
都在图片控件Click事件中编写代码

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

--  作者:狐狸爸爸
--  发布时间: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