PureBasic

Salut,

j'essaye de skinner une fenetre, donc de lui appliquer des images (ex: le bouton X remplacé par close.png) etc...

J'ai essayé avec des sprites, dans une fenetre vide, sans titre mais au moment ou je codait la gestion de la souris je me suis rendu compte du pb de ma technique: la souris resté dans le fenetre et n'en sortait plus !

Alors j'ai changé de technique, et j'ai utilisé des ImageGadget...

Code : Tout sélectionner

Enumeration
  #Win
  #close=0
  #title=1
  #back=2
  #titler
EndEnumeration

Procedure OpenNav(Title$,X,Y)
  Y=Y+20
  If OpenWindow(#Win,0,0,X,Y,  #PB_Window_BorderLess | #PB_Window_ScreenCentered,Title$)
    If CreateGadgetList(WindowID(#Win))
    
       UsePNGImageDecoder()
      

       
       

       
      ImageGadget(#close,X-20, 0, 20, 20,LoadImage(#close,"Win\close.png"))
      ImageGadget(#title, 0, 0, X, 20,LoadImage(#title,"Win\title.png"))
      ImageGadget(#back, 0, 20, X, Y,LoadImage(#back,"Win\back.png"))
      TextGadget(#titler, 0, 0, 10, 20, Title$)

    EndIf
  EndIf
EndProcedure
OpenNav("Blabla",120,120)

Repeat
  
  Event = WaitWindowEvent()

Until Event = #PB_EventCloseWindow

End

Seulement...avec ce technique je ne peut pas redimensionner les images pour qu'elles prennent la taille de la fenetre et impossible de mélanger String ou autre Gadget avec les Images

Si vous avez une idée, ou un plugin/code qui le fait je suis preneu

Merci

bon j'ai trouvé la librairie SkinWin et ca a résolu 1 problème, celui de l'arriere plan

Moi, ce que j'utilise avec mon popupmenu editeur, c'est que je découpe l'image du skin en 3 morceaux donc en 3 images
Gauche - milieu (1pixels obligatoire) - droite
et pour augmenter la taille, je redimmensionne la partie centrale.
voir l'aide de mon soft ce sera je pense plus clair.

PureBasic

Skinner une fentre

Skinner une fentre