[已解决]窗口形状可否选择?
本帖最后由 oceanwind 于 2013-5-17 14:28 编辑比如原长方形窗口横置,想点个按钮或checkbox变成竖置。
麻烦给个思路或例子
谢谢 做两个窗口切换 做两个窗口切换
netegg 发表于 2013-5-17 10:57 http://www.autoitx.com/images/common/back.gif
两个窗口可共用代码? 回复 3# oceanwind
坐标转换看你的设置 代码可以共用,但是要处理好 代码可以共用,但是要处理好
netegg 发表于 2013-5-17 12:00 http://www.autoitx.com/images/common/back.gif
单独作两个EXE文件倒是好办,但是又没共用代码。
不明白两个窗口如何共用代码的,元老能不能讲详细点
谢谢先 Opt('GUIOnEventMode', 1)
$hGuiH = GUICreate('窗口切换', 600, 200)
GUISetOnEvent(-3, '_Exit')
$iBt1 = GUICtrlCreateButton('切换', 100, 100, 150, 25)
GUICtrlSetOnEvent(-1, '_Change')
GUICtrlCreateButton('测试', 100, 130, 150, 25)
GUICtrlSetOnEvent(-1, '_Test')
GUISetState()
$hGuiS = GUICreate('窗口切换', 200, 600)
GUISetOnEvent(-3, '_Exit')
$iBt2 = GUICtrlCreateButton('切换', 50, 400, 120, 25)
GUICtrlSetOnEvent(-1, '_Change')
GUICtrlCreateButton('测试', 50, 430, 120, 25)
GUICtrlSetOnEvent(-1, '_Test')
While 1
Sleep(1000)
WEnd
Func _Change()
Switch @GUI_CtrlId
Case $iBt1
GUISetState(0, $hGuiH)
GUISetState(1, $hGuiS)
Case $iBt2
GUISetState(0, $hGuiS)
GUISetState(1, $hGuiH)
EndSwitch
EndFunc ;==>_Change
Func _Test()
MsgBox(0, '', 'Test')
EndFunc ;==>_Test
Func _Exit()
Exit
EndFunc ;==>_Exit
回复 7# afan
谢谢,漂亮
页:
[1]