PureBasic

Salut a tous,

quelqu'un pourrait il me pondre le squelette d'une fenètre contenant 10 onglets avec, dans chaque onglet 10 cases a cocher ?

Merci

Tu as comme ça par exemple :

Code : Tout sélectionner

;- Window Constants
Enumeration
  #Window_0
EndEnumeration

;- gadgets Constants
Enumeration
  #Panel_0
EndEnumeration

  If OpenWindow(#Window_0, 0, 0, 800, 600, "", #PB_Window_SystemMenu | #PB_Window_MinimizeGadget | #PB_Window_TitleBar | #PB_Window_ScreenCentered)
    PanelGadget(#Panel_0, 0, 0, 800, 600)
   
    For a = 1 To 10
    AddGadgetItem(#Panel_0, a, "Onglet "+a)
     For b = 1 To 200 Step 20 ; ce qui donne 10 onglets mais séparer de 20 en hauteur pour pas que les check se chevauche.
      c = b/20
      CheckBoxGadget(#PB_Any, 10, 10+b, 200, 20, "Check "+c, 0)
     Next 
    Next

   
  EndIf

  Repeat
   EventID = WaitWindowEvent()
    If EventID = #PB_Event_Gadget
      Select EventGadget()
         

      EndSelect
    EndIf
  Until EventID = #PB_Event_CloseWindow

@++

PureBasic

10 onglets et 10 cases a cocher

10 onglets et 10 cases a cocher

Re: 10 onglets et 10 cases a cocher