以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [讨论] 最大化按钮设置。晕,是不是语法有改呀。哪有错?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=179226)

--  作者:dxjwlf
--  发布时间:2022/8/13 11:57:00
--  [讨论] 最大化按钮设置。晕,是不是语法有改呀。哪有错?
If e.Sender.Image = GetImage ("正常化.png") Then
    e.Form.BaseForm.WindowState = 2 \' 最大化
    e.Sender.Image = GetImage ("最大化.png")
Else
    e.Form.BaseForm.WindowState = 0 \' 最大化
    e.Sender.Image = GetImage ("正常化.png")
End If

--  作者:有点蓝
--  发布时间:2022/8/13 14:11:00
--  
每次GetImage 肯定都是一个新的对象,无法比较的

If e.Form.BaseForm.WindowState = 0 Then
    e.Form.BaseForm.WindowState = 2 \' 最大化
    e.Sender.Image = GetImage ("最大化.png")
Else
    e.Form.BaseForm.WindowState = 0 \' 最大化
    e.Sender.Image = GetImage ("正常化.png")
End If