10 onglets et 10 cases a cocher

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
Avatar de l’utilisateur
SPH
Messages : 4722
Inscription : mer. 09/nov./2005 9:53

10 onglets et 10 cases a cocher

Message par SPH »

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 :idea:
http://HexaScrabble.com/
!i!i!i!i!i!i!i!i!i!
!i!i!i!i!i!i!
!i!i!i!
//// Informations ////
Intel Core i7 4770 64 bits - GTX 650 Ti
Version de PB : 6.00 - 64 bits
Avatar de l’utilisateur
venom
Messages : 3071
Inscription : jeu. 29/juil./2004 16:33
Localisation : Klyntar
Contact :

Re: 10 onglets et 10 cases a cocher

Message par venom »

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





@++
Windows 10 x64, PureBasic 5.73 x86 & x64
GPU : radeon HD6370M, CPU : p6200 2.13Ghz
Répondre