|
楼主 |
发表于 2011-5-17 10:43:17
|
显示全部楼层
回复 12# pcbar
这是界面代码
#Region AutoIt3Wrapper 预编译参数(常用参数)
#AutoIt3Wrapper_Icon= ;图标,支持EXE,DLL,ICO
#AutoIt3Wrapper_OutFile= ;输出文件名
#AutoIt3Wrapper_OutFile_Type=exe ;文件类型
#AutoIt3Wrapper_Compression=4 ;压缩等级
#AutoIt3Wrapper_UseUpx=y ;使用压缩
#AutoIt3Wrapper_Res_Comment= ;注释
#AutoIt3Wrapper_Res_Description= ;详细信息
#AutoIt3Wrapper_Res_Fileversion= ;文件版本
#AutoIt3Wrapper_Res_FileVersion_AutoIncrement=p ;自动更新版本
#AutoIt3Wrapper_Res_LegalCopyright= ;版权
#AutoIt3Wrapper_Change2CUI=N ;修改输出的程序为CUI(控制台程序)
;#AutoIt3Wrapper_Res_Field=AutoIt Version|%AutoItVer% ;自定义资源段
;#AutoIt3Wrapper_Run_Tidy= ;脚本整理
;#AutoIt3Wrapper_Run_Obfuscator= ;代码迷惑
;#AutoIt3Wrapper_Run_AU3Check= ;语法检查
;#AutoIt3Wrapper_Run_Before= ;运行前
;#AutoIt3Wrapper_Run_After= ;运行后
#EndRegion AutoIt3Wrapper 预编译参数设置完成
#cs ____________________________________
Au3 版本:
脚本作者:
Email:
QQ/TM:
脚本版本:
脚本功能:
#ce _______________脚本开始_________________
#cs ____________________________________
Au3 版本: 3.3.1.1
脚本作者: 小白QQ116154801
Email: 116154801@QQ.COM
QQ/TM: QQ116154801
HTTP://hi.baidu.com/116154801
脚本版本: 2009-10-25日 1.0 测试 目前只支持(*.INI)配置数据
脚本功能: 上移下移排列列表框的行( [*.INI配置文件 ],[列表框名 ],[字段名在列表框列的第几个 < 1 ],[0 = 上移 1 = 下移])
脚本例子: _ListView_YiDong(X:\1111.INI,$ListView1, 1, 0);往上移
_ListView_YiDong(X:\1111.INI,$ListView1, 1, 1);往下移
#ce _______________脚本开始_________________
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 623, 442, 192, 124)
$List1 = GUICtrlCreateList("", 24, 64, 153, 279)
$List2 = GUICtrlCreateList("", 192, 64, 121, 279)
$Button1 = GUICtrlCreateButton("读取", 344, 136, 75, 25)
$Button2 = GUICtrlCreateButton("Button2", 344, 176, 75, 25)
$Button3 = GUICtrlCreateButton("Button3", 344, 216, 75, 25)
$List3 = GUICtrlCreateList("", 432, 64, 153, 279)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
GUICtrlSetData ($List1, '办公软件')
GUICtrlSetData ($List2, "office2003")
GUICtrlSetData ($List2, "金山快译")
GUICtrlSetData ($List2, "PDF阅读器")
GUICtrlSetData ($List1, '娱乐软件')
GUICtrlSetFont ($List1, 18 , 500 )
While 1
;~ $msg = GUIGetMsg()
$nMsg = GUIGetMsg()
Switch $nMsg
;~ Case $NM_DBLCLK ; 双击
;~ MsgBox(0,"双击",GUICtrlRead($List1))
Case $Button1
MsgBox(0, "读取选中的项目", GUICtrlRead($List1))
;~ Case $nMsg = $GUI_EVENT_PRIMARYDOWN
;~ MsgBox(0,"","点击")
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd |
|