scrollarea.. et image de fond

[Le Soldat Inconnu]

API windows, fait une recherche sur msdn (dans google tu tapes le nom de la fonction + msdn et zou)

[Patix]

Bonjour,

merci, je vais regarder cela

[kernadec]

bonjour Patix
j'avais trouver le moyen de fixer une image de fond dans une fenêtre sur le forum anglais sans utilser d' API,
mais je ne me souviens plus où, aussi je suis désolé pour l'auteur..
mais avec l'astuce de l'image de fond dans la fenêtre, voila ce que ca donne pour ton scrolling.

Code : Tout sélectionner

CreateImage(0,500,500) 
LoadImage(1,"C:\PureBasic\skin.bmp")     ; chemin de l'image
StartDrawing(ImageOutput(0)) 
DrawImage(ImageID(1),0,0,500,500) 
StopDrawing() 
If OpenWindow(0, 0, 0, 500, 400, "ScrollAreaGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered) 
  ImageGadget(2,0,0,500,500,ImageID(0)) 
  DisableGadget(2,1)
  ScrollAreaGadget(3, 10, 10, 300,300, 375, 600, 30)
  ImageGadget(8,  -12, -12, 300, 300, ImageID(0))                      ; image gadget standard
  DisableGadget(8,1)
 	ButtonGadget  (4, 10, 10, 230, 30,"Bouton 4")
	ButtonGadget  (5, 50, 50, 230, 30,"Bouton 5")
	ButtonGadget  (6, 90, 90, 230, 30,"Bouton 6")
	StringGadget(7,50,130, 230, 20,"Ceci est le contenu d'une zone de défilement !",#PB_Text_Right)
	CloseGadgetList() 
 Repeat 
	Select WaitWindowEvent() 
				Case  #PB_Event_CloseWindow 
					End 
				Case  #PB_Event_Gadget 
			Select EventGadget()
				Case 4
  		 	 MessageRequester("Info","Le bouton 4 a été appuyé !",#PB_MessageRequester_Ok)
				Case 5
  		 	 MessageRequester("Info","Le bouton 5 a été appuyé !",#PB_MessageRequester_Ok)
				Case 6
  		 	 MessageRequester("Info","Le bouton 6 a été appuyé !",#PB_MessageRequester_Ok)
			EndSelect
		EndSelect 
	ForEver 
EndIf

cordialement

ps: je viens de retrouver le post et l'auteur :
**by MyTrial ** http://www.purebasic.fr/english/viewtop ... e&start=15

[Octavius]

Eh génial comme astuce !!!

Tout simplement en utilisant DisableGadget(), il fallait y penser...

[Patix]

Merci

Je vais tester cela !