#!PECMD
SET$ &TAB=09
SET$ &NL=0D 0A
CALC  #&&LVM_ENSUREVISIBLE=(0x1000 + 19)


CALL @WinTEST
EXIT FILE

_SUB WinTEST,W570H340,新窗口1,
	TABL PartTABL,L9T10W545H89,65:TABL1%&TAB%370:TABL2%&TAB%90:TABL3,1%&TAB%AAAAAAAAAA%&NL%2%&TAB%AAAAAAAAAA%&NL%3%&TAB%AAAAAAAAAA%&NL%4%&TAB%AAAAAAAAAA
	\%&NL%5%&TAB%AAAAAAAAAA%&NL%6%&TAB%AAAAAAAAAA%&NL%7%&TAB%AAAAAAAAAA%&NL%8%&TAB%AAAAAAAAAA
	\%&NL%9%&TAB%AAAAAAAAAA%&NL%10%&TAB%AAAAAAAAAA%&NL%11%&TAB%AAAAAAAAAA%&NL%12%&TAB%AAAAAAAAAA
	\%&NL%13%&TAB%AAAAAAAAAA%&NL%14%&TAB%AAAAAAAAAA%&NL%15%&TAB%AAAAAAAAAA%&NL%16%&TAB%AAAAAAAAAA,0x10040
	
	LABE -left -vcenter Status,L10T273W250H22,这里是状态栏，您需要的信息将会在这显示...,,0xBF0000
	
	ITEM DOIT_1,L264T270W68H28,SEL=4, ShowX 4 ,,
	ITEM DOIT_1,L338T270W68H28,SEL=10, ShowX 10 ,,
	
	ITEM DOIT_1,L412T270W68H28,Enable=1,TEAM ENVI @PartTABL.enable=1| ENVI @Status.enable=1,,
	ITEM DOIT_0,L486T270W68H28,Enable=0,TEAM ENVI @PartTABL.enable=0| ENVI @Status.enable=0,,
	
    TIME -t:1  T1,2000, ShowX  14 14
_END

_SUB ShowX  // GoLn  [SelLn]
	@IFEX #%~2>0, ENVI @PartTABL.sel=%~2
    ^CALC #&&inx=%~1 - 1  //0 base
    ENVI @PartTABL.SENDMSG=%&LVM_ENSUREVISIBLE%;%&&inx%;0
_END
