【已解决】请问如何去掉垂直滚动条？

meekly · 发表于 2011-10-26 17:26:00

本帖最后由 meekly 于 2011-10-26 20:19 编辑

如果足够高，则不出现垂直滚动条，但是如果文章过长了垂直滚动条则自动出现，怎么让这个滚动条一直不出现
第二个问题是如何在IE地址发生变化后自动转向指定的地址？谢谢大家！

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#include <WindowsConstants.au3>
Opt('MustDeclareVars', 1)
Example()
Func Example()
        Local $oIE, $GUIActiveX, $GUI_Button_Back, $GUI_Button_Forward, $GUI_Button_Leixing,$GUI_CHECKED
        Local $GUI_Button_Home, $GUI_Button_Stop, $msg, $oForm, $oText,$cols,$lForm
        $oIE = ObjCreate("Shell.Explorer.2")
        GUICreate("工单系统", 800, 600, (@DesktopWidth - 800) / 2, (@DesktopHeight - 600) / 2, BitOR($WS_CAPTION,$WS_POPUP,$WS_SYSMENU))
        $GUIActiveX = GUICtrlCreateObj ($oIE, -230, -250, 1024, 750)
        $GUI_Button_Back = GUICtrlCreateButton("填入IP", 10, 550, 100, 30)
        $GUI_Button_Forward = GUICtrlCreateButton("刷新", 230, 550, 100, 30)
        $GUI_Button_Stop = GUICtrlCreateButton("关闭", 470, 550, 100, 30)

        GUISetState()
        $oIE.navigate("http://www.baidu.com")
                _IELoadWait($oIE,1000)
                _IEHeadInsertEventScript ($oIE, "document", "oncontextmenu", "alert('No Context Menu');return false")
                ; Waiting for user to close the window
        While 1
                $msg = GUIGetMsg()

                Select
                        Case $msg = $GUI_EVENT_CLOSE
                                ExitLoop
                        Case $msg = $GUI_Button_Home
                                
                        Case $msg = $GUI_Button_Back
                                $oForm = _IEFormGetObjByName ($oIE, "ds")
                                $oText = _IEFormElementGetObjByName ($oForm, "example1")
                                _IEFormElementSetValue ($oText, "116.255.150.243")
                        Case $msg = $GUI_Button_Forward
                                Send("{F5}")
                        Case $msg = $GUI_Button_Leixing
                                
                        Case $msg = $GUI_Button_Stop
                                Exit
                EndSelect
                
        WEnd

        GUIDelete()
EndFunc

htmgyv · 发表于 2011-10-26 17:56:26

虽然是个新手，学习了~

meekly · 发表于 2011-10-26 18:32:32

等待高手的出现

lynfr8 · 发表于 2011-10-26 18:51:30

第一个问题：
http://www.autoitx.com/forum.php?mod=viewthread&tid=26865&fromuid=1003
http://www.autoitx.com/redirect. ... =93632&fromuid=1003
http://www.autoitx.com/redirect. ... 168362&fromuid=1003

http://www.autoitx.com/forum.php?mod=viewthread&tid=9845&fromuid=1003
http://www.autoitx.com/forum.php?mod=viewthread&tid=28230&highlight=document.body.scroll
第二个问题：

http://www.autoitx.com/viewthrea ... E%B5%D8%D6%B7%C0%B8
http://www.autoitx.com/forum.php?mod=viewthread&tid=19400&fromuid=1003

最后：善用搜索！

lynfr8 · 发表于 2011-10-26 18:53:04

回复 3# meekly

与其一味去等
不如主动去找

meekly · 发表于 2011-10-26 19:14:05

回复 5# lynfr8

呵呵，其实这些我都搜索到了，就是不能起作用

lynfr8 · 发表于 2011-10-26 19:17:14

回复 6# meekly

是吧，截图看看

meekly · 发表于 2011-10-26 19:54:02

回复 7# lynfr8

lynfr8 · 发表于 2011-10-26 20:21:09

回复 8# meekly

把你加了隐藏滚动条的代码发上来

meekly · 发表于 2011-10-26 20:22:01

回复 9# lynfr8

谢谢lynfr8，已经解决了！非常感谢！

lynfr8 · 发表于 2011-10-26 20:23:24

本帖最后由 lynfr8 于 2011-10-26 20:24 编辑

回复 10# meekly

如何解决的？是不是隐藏滚动条关键代码放的位置不对？还是网络延时网页加载慢导致隐藏滚动条关键代码被无效执行了？

meekly · 发表于 2011-10-26 21:44:02

回复 11# lynfr8

是的，但是判定地址变化后，跳转到指定地址还没头绪，你帮我看下怎么修改？谢谢！放的位置不对，现在就是网络延迟也会失效

hzxymkb · 发表于 2011-10-26 22:09:53

把代码放上来就会有人帮你修改，你不放谁愿意帮你呢？

		自动登录	找回密码
密码			加入

[GUI管理] 【已解决】请问如何去掉垂直滚动条？

相关帖子

本帖子中包含更多资源