PB获取鼠标单击事件,该怎么处理

PB获取鼠标单击事件
如何用PB获取鼠标单击事件，无论单击到任何控件上，类似注册键盘热键string ls_atomid
ls_atomid="myatomid1"
atomid=globaladdatom(ls_atomid)
ll_rc=registerhotkey(handle(this),atomid,0,113)
if ll_rc=0 then messagebox('','热键注册失败')