[HSP]UACシールドボタン | Codetter（こーどったー）

1
2
3
4
5
6
7
8
9
10
    #define BCM_FIRST 0x1600
    #define BCM_SETSHIELD 0x1600+0x000C
    objsize 100,35
    pos 10,10:button"Test",*owari
    sendmsg objinfo_hwnd(0),BCM_SETSHIELD,0,1   //lParam=True
    //ButtonオブジェクトにBCM_SETSHIELDを送り、lParamにTrue。
    //lParamをFalseにすることによってシールドマークが消去できる
    stop
*owari
    end
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX