梦想吧技术论坛's Archiver

似水年华 发表于 2007-4-22 06:08 PM

Au3简单CS菜单

[code]
#NoTrayIcon
If FileExists(@ScriptDir&"\bxwl.ini") = 0 Then
MsgBox(4096,"提示","配置文件不存在,程序即将退出.请联系管理员!")
Exit
EndIf
dim $1,$2,$3,$4,$5,$6,$7,$8,$9,$11,$12,$13,$14
$1 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","程序名字","")
$2 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","图片","")
$3 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","游戏名称1","")
$4 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","游戏名称2","")
$5 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","游戏名称3","")
$6 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","游戏名称4","")
$7 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","游戏名称5","")
$8 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","游戏名称6","")
$9 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","游戏名称7","")
$10 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","游戏名称8","")
$11 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","游戏名称9","")
$12 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","游戏名称10","")
$13 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","游戏名称11","")
$14 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","游戏名称12","")
dim $15,$16,$17,$18,$19,$20,$21,$22,$23,$24,$25,$26,$27
$15 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","执行文件1","")
$16 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","执行文件2","")
$17 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","执行文件3","")
$18 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","执行文件4","")
$19 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","执行文件5","")
$20 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","执行文件6","")
$21 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","执行文件7","")
$22 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","执行文件8","")
$23 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","执行文件9","")
$24 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","执行文件10","")
$25 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","执行文件11","")
$26 = IniRead(@ScriptDir &"\bxwl.ini","冰心痴","执行文件12","")
#include <GUIConstants.au3>
$Form1_1 = GUICreate($1, 633, 579, 193, 115, -1, $WS_EX_ACCEPTFILES)
$Pic1 = GUICtrlCreatePic($2, 40, 32, 545, 257, BitOR($SS_NOTIFY,$WS_GROUP))
$Button2 = GUICtrlCreateButton($3, 40, 336, 107, 41, 0)
$Button3 = GUICtrlCreateButton($4, 176, 336, 107, 41, 0)
$Button4 = GUICtrlCreateButton($5, 320, 336, 107, 41, 0)
$Button5 = GUICtrlCreateButton($6, 456, 336, 107, 41, 0)
$Button6 = GUICtrlCreateButton($7, 40, 402, 107, 41, 0)
$Button7 = GUICtrlCreateButton($8, 178, 401, 107, 41, 0)
$Button8 = GUICtrlCreateButton($9, 319, 399, 107, 41, 0)
$Button9 = GUICtrlCreateButton($10, 460, 403, 107, 41, 0)
$Button10 = GUICtrlCreateButton($11, 41, 477, 107, 41, 0)
$Button11 = GUICtrlCreateButton($12, 180, 474, 107, 41, 0)
$Button12 = GUICtrlCreateButton($13, 323, 475, 107, 41, 0)
$Button13 = GUICtrlCreateButton($14, 460, 472, 107, 41, 0)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Select
  Case $nMsg = $GUI_EVENT_CLOSE
   Exit
  Case $nMsg = $Button2
   run($15)
  Case $nMsg = $Button3
   run($16)
  Case $nMsg = $Button4
   run($17)
  Case $nMsg = $Button5
   run($18)
  Case $nMsg = $Button6
   run($19)
  Case $nMsg = $Button7
   run($20)
  Case $nMsg = $Button8
   run($21)
  Case $nMsg = $Button9
   run($22)
  Case $nMsg = $Button10
   run($23)
  Case $nMsg = $Button11
   run($24)
  Case $nMsg = $Button12
   run($25)
  Case $nMsg = $Button13
   run($26)
EndSelect
WEnd
[/code]

By[color=#0000ff]冰心痴[/color]

页: [1]

Powered by Discuz! Archiver 7.0.0  © 2001-2009 Comsenz Inc.