|
本帖最后由 mdyblog 于 2015-4-3 20:42 编辑
- TEAM ENVI^ ENVIMODE=1| ENVI^ FORCELOCAL=1
- //SET V1=C:\windows
- DIR &INILIST /O:N %V1%\
- MESS. %INILIST%
复制代码
- @TEAM ENVI^ EnviMode=1|ENVI^ ForceLocal=1
- LOGS * X.LOG
- SET ::WM_LBUTTONDOWN=0x0201
- WIN1
- _SUB WIN1,W386H481,工具
- SET-def run=1
- FIND $0=%&bX64%,DIR &INILIST /O:N %CurDir%\X32\ ! DIR &INILIST /O:N %CurDir%\X64\
- TABL E1,W380H472,380:,%&INILIST%,0x10040
- ENVI @E1.MSG=_%&::WM_LBUTTONDOWN%: CALL OnTable
- _END
- _SUB OnTable
- FIND $1=%run%,! EXIT
- ENVI @E1.Sel=?&&Sel
- ENVI @E1.Val=?%Sel%;&&V1
- FIND $%V1%=, EXIT
- IFEX %V1%\,CALL WIN2! EXEC %V1%
- _END
- _SUB WIN2,W386H481,工具
- DIR &INILIST /O:N %V1%\
- TABL E1,W380H472,380:,%&INILIST%,0x10040
- ENVI @E1.MSG=_%&::WM_LBUTTONDOWN%: CALL OnTable
- _END
复制代码
|
|