win:TGadget = CreateWindow("blah",0,0,320,240,Null) button:TGadget = CreateButton("Ok",0,0,40,20,win) Repeat WaitEvent() Select EventID() Case EVENT_MOUSEENTER Select EventSource() Case button Print "Mouse entered button area" End Select Case EVENT_WINDOWCLOSE End End Select Forever
Shouldn't "Mouse entered button area" print (on the output 'console' of course) when the mouse enters that area?
Thanks,
Russell