19377708 发表于 2010-10-2 03:01:49

AU3如何在一个窗体中嵌入另一个窗体!

AU3如何在一个窗体中嵌入另一个窗体!希望高手能指点！小弟感激不尽！

guland 发表于 2010-10-2 10:17:47

回复 1# 19377708 #include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Local $Form2, $Button2
Opt("GUIOnEventMode", 1)
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 615, 438, -1, -1)
GUISetOnEvent($GUI_EVENT_CLOSE,"Form1_event")
$Button1 = GUICtrlCreateButton("打开窗体", 258, 218, 75, 25)
GUICtrlSetOnEvent(-1, "Form1_event")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
Sleep(10)
WEnd
Func form2()
        $Form2 = GUICreate("Form2", 482, 300, -1, -1,BitOR($WS_MINIMIZEBOX, $WS_DLGFRAME, $WS_CLIPSIBLINGS), BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $Form1)
        $img = GUICtrlCreatePic("W_title_r1_c1.gif", 0, 0, 1, 1)
;上面那个图片不加上就不行,不知道为什么......你自己随便找个图片就行,图片我就不上传了
        $Button2 = GUICtrlCreateButton("关闭此窗体", 190, 122, 103, 25)
        GUICtrlSetOnEvent(-1, "Form2_event")
        GUISetState(@SW_SHOW)
EndFunc   ;==>form2
Func Form1_event()
        Switch @GUI_CtrlId
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Button1
                        form2()
        EndSwitch
EndFunc   ;==>Form1_event
Func Form2_event()
        Switch @GUI_CtrlId
                Case $Button2
                        GUIDelete($Form2)
        EndSwitch
EndFunc   ;==>Form2_event

19377708 发表于 2010-10-2 19:24:43

回复 2# guland


    非常感谢这位大哥的热心帮助，还有个问题就是，如何将非AU3的窗口，嵌入到AU3窗口中呢。比如将QQ2010登录窗口嵌入到AU3当中应该怎么做呢.

guland 发表于 2010-10-2 21:00:17

回复 3# 19377708

你去研究研究这个吧

    http://www.autoitx.com/forum.php?mod=viewthread&tid=4464&highlight=%CD%F8%B9%DCQQ

柠檬味的心 发表于 2010-10-4 18:00:37

回复 2# guland


    奥术打击阿萨德

guland 发表于 2010-10-4 18:29:08

回复 5# 柠檬味的心


    啥意思???{:1_247:}

柠檬味的心 发表于 2010-10-5 10:57:22

{:face (303):}{:face (189):}

liufenglg 发表于 2010-10-5 22:05:32

回复19377708
guland 发表于 2010-10-2 10:17 http://www.autoitx.com/images/common/back.gif


    Func form2()
      $Form2 = GUICreate("Form2", 482, 300, -1, -1,BitOR($WS_MINIMIZEBOX, $WS_DLGFRAME, $WS_CLIPSIBLINGS), $ws_ex_mdichild, $Form1)
      $img = GUICtrlCreatePic("2.jpg", 0, 0, 1, 1)
      $Button2 = GUICtrlCreateButton("关闭此窗体", 190, 122, 103, 25)
      GUICtrlSetOnEvent(-1, "Form2_event")
      GUISetState(@SW_SHOW)
EndFunc   ;==>form2

yiruirui 发表于 2010-10-8 09:17:00

回复 2# guland


            $img = GUICtrlCreatePic("Water lilies.jpg", 0, 0, 1, 1)
;上面那个图片不加上就不行,不知道为什么......你自己随便找个图片就行,图片我就不上传了
我把换成JPG格式的了，运行没什么效果啊。

guland 发表于 2010-10-8 20:33:22

回复 9# yiruirui

Water lilies.jpg这个文件是不是在脚本的目录啊?

实在不行就随便弄个GIF的

yiruirui 发表于 2010-10-9 15:26:13

回复 10# guland


    哦，好的！3KS！

vason1019 发表于 2012-3-20 10:40:03

父子窗口合并吗

whitehead 发表于 2012-3-26 17:22:47

学习，留个印

loveauto 发表于 2013-8-30 14:37:50

学习学习，例子运行没看到效果

轩辕小妖 发表于 2013-9-21 15:10:42

试试设置父窗口..
页: [1] 2
查看完整版本: AU3如何在一个窗体中嵌入另一个窗体!