PureSkin (Window.l,Gadget.l,Image.l,Filename$,Flag.l)
Previous
Top
Next
Skin the Selected Window from File.
Use:
PureSkin(#Window,#Gadget,#Image,"MySkin.pvs",#True)
Flags: #True = Center Window
Returns 1 if success.
Example:
#Main=0
#Gadget_Skin=1
#Image_Skin=2
If OpenWindow(#Main,0,0,400,300,#PB_Window_SystemMenu|#PB_Window_ScreenCentered,"Demo")
PureSkin(#Main,#Gadget_Skin,#Image_Skin,"MySkin.pvs",#True) ;<-- Loads PureSkin from File
PureSkinHide(#Main,#False)
quitMain=0
Repeat
Select WaitWindowEvent()
Case #PB_Event_CloseWindow
quitMain=1
EndSelect
Until quitMain
EndIf
End