找回密码
 加入
搜索
楼主: pyj521

[系统综合] 大侠们请教 怎么运行下拉框中选中的文件呢

 火.. [复制链接]
发表于 2013-8-20 08:36:25 | 显示全部楼层

#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 330, 115, 192, 124)
$EXEToRun = GUICtrlCreateCombo("", 88, 56, 145, 25, BitOR($CBS_DROPDOWNLIST,$CBS_AUTOHSCROLL))
GUICtrlSetData(-1, "NOTEPAD.EXE|CALC.EXE|CMD.EXE|MSTSC.EXE|")
;也可以给这个控件加上事件GUICtrlSetOnEvent(-1,'RunCommand'),然后就不用点击“执行”按钮了
GUICtrlCreateButton("执行", 248, 56, 75, 25)
GUICtrlSetOnEvent(-1,'RunCommand')
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
GUISetOnEvent($GUI_EVENT_CLOSE,'QuitTool')
While 1
        Sleep(100)
WEnd

Func QuitTool()
        Exit
EndFunc

Func RunCommand()
        $RunData=Run(GUICtrlRead($EXEToRun))
        If Not $RunData = '' Then
                Run($RunData)
        EndIf
EndFunc

 楼主| 发表于 2013-8-20 10:56:27 | 显示全部楼层
本帖最后由 pyj521 于 2013-8-20 10:58 编辑

回复 15# fhqbbfcu2050
单独的是可以实现的,我试了,无法整合到我的那个源码中去,技术有限啊!我用另外一种方法实现了,在此,衷心的谢谢大家热心的帮助!谢谢大家!
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-5-20 10:38 , Processed in 0.069418 second(s), 15 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表