#!PECMD
//格式
//ENVI @控件或窗口名.MSG=消息:命令
//下面3个消息
//WM_MOUSEENTER 0x1000 鼠标进入
//WM_MOUSEHOVER 0x02A1 鼠标停留
//WM_MOUSELEAVE 0x02A3 鼠标离开
ENVI MSG=空
ENVI id=0

CALL @子程式
_SUB 子程式,W400H400,新視窗PECMD2012.1.59消息演示,,
        LABE  LB,  L10T50W200H40,LABE%MSG%
        EDIT| ED, L10T100W200H40,EDIT%MSG%,,4
        ITEM  BT, L10T150W200H40,ITEM%MSG%
        MEMO  MO, L10T200W200H60,MEMO%MSG%
        
        ENVI @ED.MSG=0x1000:ENVI @ED=欢迎光临
        ENVI @ED.MSG=0x02A1:ENVI @ED=欢迎指导
        ENVI @ED.MSG=0x02A3:ENVI @ED=下次再来

        ENVI @BT.MSG=0x1000:ENVI @BT=欢迎光临
        ENVI @BT.MSG=0x02A1:ENVI @BT=欢迎指导
        ENVI @BT.MSG=0x02A3:ENVI @BT=下次再来

        ENVI @LB.MSG=0x1000:ENVI @LB=欢迎光临
        ENVI @LB.MSG=0x02A1:ENVI @LB=欢迎指导
        ENVI @LB.MSG=0x02A3:ENVI @LB=下次再来
        
        ENVI @MO.MSG=0x1000:ENVI @MO=欢迎光临
        ENVI @MO.MSG=0x02A1:ENVI @MO=欢迎指导
        ENVI @MO.MSG=0x02A3:ENVI @MO=下次再来

        ENVI @子程式.MSG=0x1000:TEAM ENVI @子程式=0x1000鼠标进入-- %id% |CALC id=%id%+1
        ENVI @子程式.MSG=0x02A1:TEAM ENVI @子程式=0x02A1鼠标停留-- %id% |CALC id=%id%+1
        ENVI @子程式.MSG=0x02A3:TEAM ENVI @子程式=0x02A3鼠标离开-- %id% |CALC id=%id%+1

_END

