PtInRect_ Help Please

[SoulReaper]

Hello all

I have not been on the forums for some time but im still here

I am trying to convert this Routine to PureBasic 4.51 but it says Incorrect number of parameters.

Code: Select all

Procedure InsideGadget(g.l)
; True when mouse x & mouse y are inside Gadget else Returns False 
  GetWindowRect_(GadgetID(g),@rec.RECT) 
  If PtInRect_(@rec,DesktopMouseX(),DesktopMouseY()) 
    ProcedureReturn #True 
  Else 
    ProcedureReturn #False 
  EndIf 
EndProcedure

How would it be done in PureBasic 4.51 as it works in 4.20

Thankyou in Advance
Kevin

[flaith]

Hi,

try instead

Code: Select all

PtInRect_(moverect, DesktopMouseX() | (DesktopMouseY()<<32))

[SoulReaper]

Thankyou

I would never have thought of doing it that way

Regards
Kevin