SET  ::WM_MOUSEENTER                   =0x1000
SET  ::WM_MOUSEHOVER                   =0x02A1
SET  ::WM_MOUSELEAVE                   =0x02A3
SET  ::WM_DROPFILES                    =0x0233

WIN2

_SUB WIN2,W360H440,PECMD2012功能演示,
    EDIT EDIT1,L28T14W158H29,0,,
    SPIN SPIN1,L192T13W22H30,EDIT1,&&npos:&&button:&&old, ENVI @LABE3=  SPIN1  [%&npos%] [%&button%] [%&old%] , 0xA0  //USERCTRL
    ITEM ITEM1,L32T82W60H30,查询,  CALL OnButton1,
    ITEM ITEM2,L117T81W60H30,设置, CALL OnButton2,
    ENVI &&POS=0
    LABE LABE3,L29T147W287H134,LABE3,,
    ENVI @SPIN1.MSG=0x1000: ENVI @LABE3= ENTER--
    ENVI @SPIN1.MSG=0x02A1: ENVI @LABE3= 0x02A1--
    ENVI @SPIN1.MSG=0x02A3: ENVI @LABE3= 0x02A3--
    ENVI @SPIN1.MSG=0x0233: ENVI @LABE4= WM_DROPFILES --
    LABE LABE4,L31T288W286H30,LABE4,,
_END

_SUB OnButton1  
    ENVI @SPIN1.VAL=?&&POS:&&FROM:&&TO 
    ENVI @LABE3=  [%&POS%] [%&FROM%] [%&TO%]
_END

_SUB OnButton2  
    TEAM CALC #&POS=%&POS% + 1| ENVI @SPIN1.VAL=%&POS%:-20:5 
_END


