PurePoint (Filename$)
Previous  Top  Next

Loads a PurePoint from File.

Use:
hPoint=PurePoint("Cross.pvp")

Returns Handle to PurePoint.


Example:

#Main=0
If OpenWindow(#Main,0,0,400,300,#PB_Window_SystemMenu|#PB_Window_ScreenCentered,"Demo")
hPoint=PurePoint("Cross.pvp") ;<-- Loads PurePoint from File  

quitMain=0  
Repeat  
UsePurePoint(hPoint)  

Select WaitWindowEvent()  
Case #PB_Event_CloseWindow  
quitMain=1  
EndSelect  
Until quitMain  

FreePurePoint(hPoint)  
EndIf
End