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

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

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 ... ight=%CD%F8%B9%DCQQ

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

回复 2# guland

奥术打击阿萨德

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

回复 5# 柠檬味的心

啥意思???

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

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

回复 19377708
guland 发表于 2010-10-2 10:17

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

试试设置父窗口..

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

[交流] AU3如何在一个窗体中嵌入另一个窗体!

评分

评分