[D7] Associer le ItemIndex d'une ComboBox à des Checkbox

Bonjour, le titre étant un peut évasif je m'explique sur mon problème. Je suis en pleine création d'une interface et je doit associer les Hints de ma Combobox à plusieurs checkbox, c'est Hint corresponde à: "Box" et "serveur". (Si le Hint box est sélectionner alors certaine Checkbox ce coche automatiquement)

Je suis partis sur le fait qu'il faut utiliser les ItemIndex (Cela fait un jour que je suis sur Delphi 7 donc ne m'en voulais pas trop si cela parait "Logique" :mouarf: )
mais je ne vois pas comment associer mes checkbox au ItemIndex.

Merci d'avoir au moins pris le temps de lire ;) et pour ceux qui s'arrêterons pour répondre. En attendant je vais continué à chercher !

bonne journée :)

Dans le onChange de ta combobox

Code:

---

1 2 3

Chk_Serveur.Checked := (Combobox.ItemIndex = 0); Chk_Box.Checked := (Combobox.ItemIndex = 1);

---

à adapter selon le positonnement de serveur et box dans la combobox en sachant que les combobox démarre l'index à 0

C'est à dire dans le OnChange? J'ai une liste qui s'affiche (Bouton, checkBo,..). Je peut y sélectionner plusieurs choses? Car j'ai plusieurs, une dizaine, de checkbox à associés sur "Box" et "serveur".

En me relisant (Et en voyant votre code) je pense que je me suis mal exprimer :mouarf: !

Box et Serveur sont les choix de la ComboBox. Mais si j'ai bien compris j'associe mes Checkbox de cette manière:

Code:

---

1 2 3 4 5 6 7 8 9 10 11

procedure TForm1.CbPreSelecChange(Sender: TObject); begin   CbKodakDrivers.Checked := (CbPreSelec.ItemIndex =0); CbMicrosoftDeps.checked := (CbPreSelec.ItemIndex =0);   if (CbPreSelec.ItemIndex =0) then begin CbKodakDrivers.Checked := True; CbMicrosoftDeps.checked := True; end; end;

---

Le 0 correspond à la Box.

Edit: J'ai essayé votre syntaxe, voir ci-dessus, mais rien. Est-ce bien cette syntaxe (La mienne) ?

Code:

---

1 2 3 4 5 6

procedure TForm1.CbPreSelecChange(Sender: TObject); begin CbKodakDrivers.Checked := (CbPreSelec.ItemIndex =0); CbMicrosoftDeps.checked := (CbPreSelec.ItemIndex =0); end;

---

J'ai finis par trouver de moi même ;) Merci quand même contador ! En fait je pensé que Rayek parlais du Onchange dans le "Object Inspector" :sleep:

Et :merci: à Rayek =)

Bonne journée à vous !