autoit3CN 发表于 2016-11-24 01:58:35

请问如何内嵌IE不显示边框

#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ListViewConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
$Form1_1 = GUICreate("如何才能做到内嵌IE的控件不显示边框", 1006, 633, 176, 136)
$SongPayerI = _IECreateEmbedded()
GUICtrlCreateObj($SongPayerI, 648, 25, 325, 90)
_IENavigate ($SongPayerI, "about:blank", 0)
$Str = _
                '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">' & @CRLF & _
                '<TD align="left"><HTML>' & @CRLF & _
                '<HEAD>' & @CRLF & _
                '<META content="text/html; charset=unicode" http-equiv=Content-Type>' & @CRLF & _
                '<META name=GENERATOR content="MSHTML 11.00.9600.18163"></HEAD>' & @CRLF & _
                '<BODY>' & @CRLF & _
                '<body style="margin:0;padding:0">' & @CRLF & _;
                '<META name=GENERATOR content="MSHTML 11.00.9600.18163">' & @CRLF & _
                '</TD></BODY>' & @CRLF & _
                '</HTML>' & @CRLF & _
                ''
_IEDocWriteHTML($SongPayerI, $Str)
$SongPayerI.document.execCommand("Refresh");
_IEBodyWriteHTML($SongPayerI, '<iframe frameborder="no" border="0" marginwidth="0" marginheight="0" width=300 height=80 src="http://music.163.com/outchain/player?type=2&id=60274&auto=0&height=66"></iframe>')
GUISetState(@SW_SHOW)
While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
        EndSwitch
WEnd


目前现状:

期望结果:


有劳各位坛友帮帮忙了,Thanks~~~

autoit3CN 发表于 2016-11-24 11:38:54

或者能做到不显示垂直滚动条部分即可,主要滚动条上下两个箭头和框宽不好看影响播放器美观。
实在不行,只能考虑用其他控件遮挡了。

autoit3CN 发表于 2016-11-24 12:50:59

回复 2# autoit3CN

经过尝试
不显示垂直滚动条只需要加一句代码:
$SongPayerI.document.body.scroll = "no"

komaau3 发表于 2016-11-25 21:17:53

这个问题N年前就有人讨论过,不太好实现,隐藏滚动条不同版本IE好像也有不同标准

komaau3 发表于 2016-11-25 21:17:55

这个问题N年前就有人讨论过,不太好实现,隐藏滚动条不同版本IE好像也有不同标准
页: [1]
查看完整版本: 请问如何内嵌IE不显示边框