返回列表 回复 发帖

Autoit3 随机效果

调用DLLCALL的。。。

  1. #include <GUIConstants.au3>
  2. Dim $NUM,$TMP[10]
  3.         $TMP[1] = "0x00000001"
  4.                 $TMP[2] = "0x00000002"
  5.                 $TMP[3] = "0x00000004"
  6.                 $TMP[4] = "0x00000008"
  7.                 $TMP[5] = "0x00080000"
  8.                         $TMP[6] = "0x00040010"
  9.                                 $TMP[7] = "0x00080000"
  10.                                         $TMP[8] = "0x00080000"
  11.                                                 $TMP[9] = "0x00090000"
  12.                 $NUM = $TMP[Random(1,9)]
  13. $hwnd=GUICreate("随机效果",350,400)
  14. DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long",$num);fade-in
  15. GUISetState()
  16. While 1
  17.     $msg = GUIGetMsg()
  18.         
  19.           If $msg = $GUI_EVENT_CLOSE Then
  20.                   Set_Exit()
  21.                   
  22.                   ExitLoop
  23. EndIf
  24. Wend
  25.                   Func Set_Exit()
  26.         DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 500, "long", 0x00090000)
  27.         Exit
  28. EndFunc
复制代码
文章来源AUTOIT中文论坛www.autoit.net.cn,本贴原地址:http://www.autoit.net.cn/viewthread.php?tid=129
感谢Baidu,Google,Dreams8给我这次机会!
还要感谢我的爸爸妈妈!
HOHO
返回列表