|
发表于 2009-11-6 00:45:34
|
显示全部楼层
本帖最后由 lifuxing8 于 2009-11-6 00:49 编辑
刷新自身窗口用递归算法
createform()
func createform()
$Form1 = GUICreate("中国移动", 622, 446, 254, 133)
$Button2 = GUICtrlCreateButton("删除功能", 108, 7, 88, 25)
GUICtrlSetBkColor($Button2, 0xF1EFE2)
.....
while 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
Exit
case $msg=$Button2
GUIDelete($Form1)
......
......
createform()
endselet
wend
endfunc |
|