多IE 窗口嵌套特效，大虾来哦

d12990

如图效果：左边分别是三个网址，点击一个网址，右边就打开IE窗口显示相应的网站，这种效果咋做
最好能附上源码，多谢

tryhi

我先问一下，不要三个网址，一个你会做么？

tryhi

算了，就几行代码

#include<ie.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

$oIE = _IECreateEmbedded()
GUICreate("", 510, 510, -1, -1)
$B1 = GUICtrlCreateButton("百度", 0, 64, 75, 25)
$B2 = GUICtrlCreateButton("论坛", -1, 89, 75, 25)
$B3 = GUICtrlCreateButton("淘宝", -1, 116, 75, 25)
$GUIActiveX = GUICtrlCreateObj($oIE, 100, 0, 400, 500)
GUISetState()

While 1
        $msg = GUIGetMsg()
        Select 
                        Case $msg = $GUI_EVENT_CLOSE
                                Exit
                        Case $msg = $b1
                                _IENavigate($oIE, "http://www.baidu.com/")
                        Case $msg = $b2
                                _IENavigate($oIE, "http://www.autoitx.com/")
                        Case $msg = $b3
                                _IENavigate($oIE, "http://www.taobao.com/")
        EndSelect
WEnd

逆水风帆

呵呵，看到代码发现自己想复杂了

131738

算了，就几行代码
tryhi 发表于 2011-6-4 01:55

看来这家伙拿了源码走人了。。。吭都没吭一声。。。。

tryhi

看来这家伙拿了源码走人了。。。吭都没吭一声。。。。
131738 发表于 2011-6-4 14:51

哎……估计是，这家伙今天有登录过，就是没吭声，过两天拿他来扣钱

d12990

tryhi    多谢  了

我不会走的，放心呐{ :face (125):}

tryhi

tryhi    多谢  了

我不会走的，放心呐{ :face (125):}
d12990 发表于 2011-6-5 10:56

    如果解决的话把标题改一下，不然AFAN版会生气的

d12990

今天一直在测试代码，楼上的源码不错，只是我后来想把网址放在下面显示，看上去会美观些，左右布局改为上下布局

搞了半天也改不了那种效果，楼上大哥能不能帮我下...拜谢


窗口样式：

                IE窗口

    网址1   网址2   网址3

willey

这个不错啊，学习

devil3380

这样也能加钱啊

fqvip1

这样也能加钱啊

ddryao

无聊的帖子。我来灌水哈。

mhh123

来看看，好东西

devil3380

上下布局的.稍微修改的LS的

#include<ie.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

$oIE = _IECreateEmbedded()
GUICreate("专用", -1, -1, -1, -1, $WS_SIZEBOX)
$B1 = GUICtrlCreateButton("百度", 0, 0, 75, 25)
$B2 = GUICtrlCreateButton("论坛", 100, 0, 75, 25)
$B3 = GUICtrlCreateButton("淘宝", 200, 0, 75, 25)
$GUIActiveX = GUICtrlCreateObj($oIE, 0, 30, 400, 500)
GUISetState()

While 1
        $msg = GUIGetMsg()
        Select 
                        Case $msg = $GUI_EVENT_CLOSE
                                Exit
                        Case $msg = $b1
                                _IENavigate($oIE, "http://www.baidu.com/")
                        Case $msg = $b2
                               ;$oIE = _IECreate("http://www.autoitx.com/logging.php?action=login")
                                                           _IENavigate($oIE, "http://www.autoitx.com/logging.php?action=login")

                        Case $msg = $b3
                                _IENavigate($oIE, "http://www.taobao.com/")
        EndSelect
WEnd