FreePurePoint (hPoint.l)
Previous
Top
Next
Free PurePoint Resources of specified Handle.
Use:
FreePurePoint(hPoint)
Returns 0 if success.
Example:
#Main=0
If OpenWindow(#Main,0,0,400,300,#PB_Window_SystemMenu|#PB_Window_ScreenCentered,"Demo")
hPoint=PurePoint("Cross.pvp")
quitMain=0
Repeat
UsePurePoint(hPoint)
Select WaitWindowEvent()
Case #PB_Event_CloseWindow
quitMain=1
EndSelect
Until quitMain
FreePurePoint(hPoint)
;<-- Free PurePoint Resources
EndIf
End