pour ne pas poluer le topic de Blendman sur son logiciel d'anim , voici un code simple qui te permettra de mettre en oeuvre
n'importe quel gadget perso dans un canvas:
chaque gadget à une structure commune , aucun gadget hérite directement de cette structure.
la structure commune à tout les gadget à tout les attribut dont un gadget à besoin pour fonctionné :
Information sur la position
sur la taille
les différentes images qui le compose
quelques info de base ( survol de souris , bouton de souris )
un pointeur sur fonction d'évenement
on pourrais en rajouté qq uns...
avec du code :
Code : Tout sélectionner
Structure s_Gadget
x.i
y.i
width.i
height.i
mouseIsHoover.b
mouseIsClicked.b
image_normal.i
image_hoover.i
image_clicked.i
image_current.i
*event_callback.i
EndStructure
ensuite , chaque gadget pourra hérité de cette structure grâce au mot clé extends :
Code : Tout sélectionner
Structure s_ToggleButton Extends s_Gadget
state.b
EndStructure
cela évite de se retapé des lignes et des fonctions pour chaque type de gadget...
tout les gadgets seront stocké dans une liste , qui elle même est proprement rangé dans une autre structure, qui elle , contient des informations
sur la gui en elle même , sa fenetre mère, le canvas sur lequel on dessine , un flag pour savoir si on fait le rendu ou pas de la gui, pas besoin de faire un rendu toute les frames, sinon bonjour la vitesse..., la liste de tout les gadgets, la position de la souris , on pourrais en rajouté encore , le clavier par exemple.
Code : Tout sélectionner
Structure s_Gui
windowID.i
canvasID.i
needToRender.b
List *gadget_list.s_Gadget()
Array MouseButton.b(2)
mousex.i
mousey.i
EndStructure
ensuite , une tripoté de fonction pour assemblé le tout , je te laisse fouillé dans le code situé plus bas
sache juste que la structure s_Gui est le sommet de ta gui , c'est elle qui gère tout les gadgets , cependant , elle ne connais pas la spécialité de chacun, elle ne connais que s_Gadget , donc le strict minimum pour l'affichage & les events commun, chaque type de gadget doit donc avoir sa propre fonction qui gère les evenements
celle ci sera appeler par la structure "mère" s_Gui.
voilà , c'est une base solide pour une GUI , qui est valide pour tout type de gui , dans le jeu vidéo comme dans l'applicatif.
si tu ne pige pas un point , poste ici.
Code : Tout sélectionner
CreateImage(0,32,32)
CreateImage(1,32,32)
CreateImage(2,32,32)
StartDrawing(ImageOutput(0))
Box(0,0,32,32,RGB(255,0,0))
StopDrawing()
StartDrawing(ImageOutput(1))
Box(0,0,32,32,RGB(0,255,0))
StopDrawing()
StartDrawing(ImageOutput(2))
Box(0,0,32,32,RGB(0,0,255))
StopDrawing()
Structure s_Gadget
x.i
y.i
width.i
height.i
mouseIsHoover.b
mouseIsClicked.b
image_normal.i
image_hoover.i
image_clicked.i
image_current.i
*event_callback.i
EndStructure
Structure s_ToggleButton Extends s_Gadget
state.b
EndStructure
Structure s_Gui
windowID.i
canvasID.i
needToRender.b
List *gadget_list.s_Gadget()
Array MouseButton.b(2)
mousex.i
mousey.i
EndStructure
Procedure.i create_gui(windowID.i)
*gui.s_Gui = AllocateMemory(SizeOf(s_Gui))
InitializeStructure(*gui,s_Gui)
*gui\windowID = WindowID
*gui\needToRender = #True
*gui\canvasID = CanvasGadget(#PB_Any,0,0,WindowWidth(*gui\windowID),WindowHeight(*gui\windowID))
ProcedureReturn *gui
EndProcedure
Procedure gui_event(*gui.s_Gui)
*gui\mousex = WindowMouseX(*gui\windowID)
*gui\mousey = WindowMouseY(*gui\windowID)
CompilerIf #PB_Compiler_OS = #PB_OS_Windows
*gui\MouseButton(0) = GetAsyncKeyState_(#VK_LBUTTON)
*gui\MouseButton(1) = GetAsyncKeyState_(#VK_RBUTTON)
*gui\MouseButton(2) = GetAsyncKeyState_(#VK_MBUTTON)
CompilerEndIf
; foreach all gadget for event
;
ForEach *gui\gadget_list()
*cGadget.s_Gadget = *gui\gadget_list()
; the mouse is over the gadget
;
If *gui\mousex => *cGadget\x And *gui\mousex < *cGadget\x + *cGadget\width And *gui\mousey => *cGadget\y And *gui\mousey < *cGadget\y + *cGadget\height
*cGadget\mouseIsHoover = #True
Else
*cGadget\mouseIsHoover = #False
EndIf
; update the correct image
;
If *cGadget\mouseIsHoover = #False And *cGadget\image_current = *cGadget\image_hoover
*cGadget\image_current = *cGadget\image_normal
*gui\needToRender = #True
EndIf
If *cGadget\mouseIsHoover = #True
*cGadget\image_current = *cGadget\image_hoover
*gui\needToRender = #True
EndIf
; call the gadget event function
;
If *cGadget\event_callback <> #Null
CallFunctionFast(*cGadget\event_callback, *cGadget)
EndIf
Next
EndProcedure
Procedure render_gui(*gui.s_Gui)
gui_event(*gui)
If *gui\needToRender = #True
StartDrawing(CanvasOutput(*gui\canvasID))
*gui\needToRender = #False
ForEach *gui\gadget_list()
*cGadget.s_Gadget = *gui\gadget_list()
If IsImage(*cGadget\image_current)
DrawAlphaImage(ImageID(*cGadget\image_current), *cGadget\x, *cGadget\y)
EndIf
Next
StopDrawing()
EndIf
EndProcedure
Procedure add_gadget_to_gui(*gui.s_Gui, *gadget.s_Gadget)
AddElement(*gui\gadget_list())
*gui\gadget_list() = *gadget
EndProcedure
Procedure toggleButonEventCallBack(*gadget.s_ToggleButton)
If *gadget\mouseIsHoover = #True
Debug "mouse is over this gadget : " + Str(*gadget)
EndIf
EndProcedure
Procedure.i createToggleButton(*gui.s_Gui, x.i,y.i,width.i,height.i)
*b.s_ToggleButton = AllocateMemory(SizeOf(s_ToggleButton))
*b\state = #False
;chargement des images...
*b\image_normal = 0
*b\image_hoover = 1
*b\image_clicked = 2
*b\x = x
*b\y = y
*b\width = width
*b\height = height
;callback du gadget
*b\event_callback = @toggleButonEventCallBack()
;ajout à la gui
add_gadget_to_gui(*gui,*b)
ProcedureReturn *b
EndProcedure
;-example
OpenWindow(0,0,0,442,442,"gui canvas")
*gui = create_gui(0)
For y = 0 To 9
For x = 0 To 9
createToggleButton(*gui,10+(x*42),10+(y*42),32,32)
Next
Next
Repeat
event = WindowEvent()
render_gui(*gui)
Until event = #PB_Event_CloseWindow
, je vais étudier ton explication, merci G-Rom.
