PVGadgets_CanvasButtonHover (WindowID.l)
Previous  Top  Next

Checks if Mouse Pointer is over CanvasButton on specified Window and replaces with Sub Image.

Use:
Result=PVGadgets_CanvasButtonHover()

Returns CanvasID of CanvasButton that mouse hovers over.



Example:

XIncludeFile "Buttons_Constants.pb"
XIncludeFile "Buttons_Windows.pb"


;-Main Loop
If Window_Main()
PVGadgets_CanvasButtonAdd(#Window_Main,#Gadget_Main_Settings,#Image_Main_Settings,#Image_Icons_Settings)  
PVGadgets_CanvasButtonAdd(#Window_Main,#Gadget_Main_Web,#Image_Main_Web,#Image_Icons_Web)  
PVGadgets_CanvasButtonAdd(#Window_Main,#Gadget_Main_Info,#Image_Main_Info,#Image_Icons_Info)  
 
quitMain=0  
Repeat  
PVGadgets_CanvasButtonHover(#Window_Main)  
EventID=WindowEvent()  
If EventID  
Select EventID  
Case #PB_Event_CloseWindow  
If EventWindowID()=#Window_Main  
quitMain=1  
EndIf  
 
Case #WM_LBUTTONDOWN  
Select PVGadgets_CanvasButtonPressed()  
Case #Gadget_Main_Settings  
SetGadgetText(#Gadget_Main_Press,"S e t t i n g s . . .")  
Case #Gadget_Main_Web  
SetGadgetText(#Gadget_Main_Press,"W e b s i t e . . .")  
Case #Gadget_Main_Info  
SetGadgetText(#Gadget_Main_Press,"I n f o r m a t i o n . . .")  
EndSelect  
EndSelect  
 
Else  
Delay(1)  
EndIf  
Until quitMain  
CloseWindow(#Window_Main)  
EndIf