
IMPORT  WM_消息.wcs
CALL WIN1

_SUB WIN1,W200H200, TEST1,,,-#10
    ENVI I=0
    LABE LB,L10T20W180H20,--%I%--,,
    TIME TIMER0,1000, TEAM CALC I=%I% + 1| ENVI @LB=--%I%--
    ITEM BT,L50T50W60H30,停止,TEAM   ENVI @TIMER0=0| ENVI @LB=--%I%--按钮停止,
    ENVI @WIN1.MSG=%&WM_LBUTTONUP%:TEAM ENVI @TIMER0=0| ENVI @LB=--%I%--单击停止
    EDIT Edit1,L32T90W120H24,11,,
    EDIT Edit2,L32T130W120H24,222,,
    ENVI @Edit1.MSG=%&WM_LBUTTONUP%:TEAM ENVI @TIMER0=0| ENVI @LB=--%I%--单击EDIT停止
    ENVI @WIN1.MSG=%&WM_LBUTTONDBLCLK%: KILL \    //双击退出
    ITEM ITEM1,L123T51W60H30,关闭,  KILL \
_END

