PB中完成圖片按鈕的mousemove事件
發(fā)表時間:2023-08-18 來源:明輝站整理相關(guān)軟件相關(guān)文章人氣:
[摘要]四川省綿陽市 李萬昌 ---- PB中除窗口(window)和富文本(richtextedit)具有mousemove事件外,其他控件都不接收ousemove事件。在某些程序中,可能會對按鈕進(jìn)行動態(tài)...
四川省綿陽市 李萬昌
---- PB中除窗口(window)和富文本(richtextedit)具有mousemove事件外,其他控件都不接收ousemove事件。在某些程序中,可能會對按鈕進(jìn)行動態(tài)的圖片切換,如:鼠標(biāo)移到按鈕上時,切換按鈕的圖片以實現(xiàn)動感。
---- 創(chuàng)建一個用戶自定義對象(User Object),取名uo_picbutton,其上放一個Picture控件(p_1)。選中p_1,定義用戶自定義事件(user events),在event name中輸入mousemove, 由下面的Paste Event ID中選取pbm_mousemove放入Event ID欄。自此,p_1的事件欄中增加了事件mousemove,在其中編程:
---- p_1.picturename="c:\圖片_over.bmp" //鼠標(biāo)移動到p_1上時要顯示的圖片
---- 關(guān)閉user object,新建一個窗口,添加剛才建成的user object(uo_1).在form的open事件中編程:
---- uo_1.p_1.picturename="c:\圖片_up.bmp" //初始圖片
---- 在form的mousemove事件中編碼:
---- uo_1.p_1.picturename="c:\圖片_up.bmp" //恢復(fù)原來的圖片
---- 這樣,運(yùn)行時一旦鼠標(biāo)移動到該控件上就會變換圖片,從而產(chǎn)生動態(tài)效果。只要在uo_picbutton的mousemove事件中增加兩三句代碼,可以使其成為通用的圖片按鈕;添加user event事件,并拷貝下面列出的事件ID(event id),可以生成更多的原本不能接收的事件。