#!PECMD
//检测中文::计算
ENVI$ &&NL=0a
ENVI$ &&TAB=09
SET  ::WM_LBUTTONDOWN=0x0201
SET  ::WM_LBUTTONUP=0x0202

CALL WIN1

_SUB WIN1,W339H125,测试,
    LABE+ DOIT1,L57T20W90H60,有捕鼠器\n按下鼠标移出窗口能收到弹起消息,*,
    LABE+ DOIT2,L160T20W90H57,无捕鼠器\n按下鼠标移出窗口收不到弹起消息,*,
    ENVI @DOIT1.MSG=%&WM_LBUTTONDOWN%: TEAM CALC #&I=%&I% +1| ENVI @this=DW1 %&I%| ENVI @this.MouseCapture=1  //DOIT1有捕鼠器
    ENVI @DOIT1.MSG=%&WM_LBUTTONUP%: TEAM   ENVI @this=UP1 %&I%
    ENVI @DOIT2.MSG=%&WM_LBUTTONDOWN%: TEAM CALC #&I=%&I% +1| ENVI @this=DW2 %&I%   //DOIT2无捕鼠器
    ENVI @DOIT2.MSG=%&WM_LBUTTONUP%: TEAM   ENVI @this=UP2 %&I%
    ENVI @this.MSG=%&WM_LBUTTONUP%: TEAM   ENVI @this=UP  %&I%| ENVI @this.MouseCapture=0
_END

