Discussion :

[essof_salhi]

bonjour
j'ai 3 tableau d'enregistrement exemple(etudiant,professeur,ouvrier) et 3 boutonRadion(etudiant,professeur,ouvrier)
apres la selection du boutonRadio etudiant je veux que la liste des etudiant s'affiche dans un combobox
j'ai un petit probleme apres la selection du bouton radio la liste deroulante est vide.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
  if RadioButton1.Checked then   begin
 
      for I:= 0 to nbEtudiant do
         ComboBox1.Items.AddObject('tbEtudiant[I].name',tbEtudiant[I].objet);

[ShaiLeTroll]

Est-ce le bon bouton ? RadioButton1 n'est pas très explicite comme nommage

nbEtudiant est-il renseigné ?
si tu vas de 0 à nbEtudiant, tu vas ajouter nbEtudiant + 1 objets donc risque de dépassement

si tbEtudiant est un tableau, utilise for I:= Low(tbEtudiant) to High(tbEtudiant) do ou si c'est une Liste for I:= 0 to High tbEtudiant.Count -1 do.

attention, tu auras 'tbEtudiant[I].name' répété autant de fois, retire les '

[essof_salhi]

Est-ce le bon bouton ? RadioButton1 n'est pas très explicite comme nommage

nbEtudiant est-il renseigné ?
si tu vas de 0 à nbEtudiant, tu vas ajouter nbEtudiant + 1 objets donc risque de dépassement

si tbEtudiant est un tableau, utilise for I:= Low(tbEtudiant) to High(tbEtudiant) do ou si c'est une Liste for I:= 0 to High tbEtudiant.Count -1 do.

attention, tu auras 'tbEtudiant[I].name' répété autant de fois, retire les '

merci mai le probleme c est avec le boutonRadio si j'ajoute "if BoutonRado1.checked then ...." la liste deroulante n'affiche aucun valeur et si je met cet instruction en commentaire la liste deroulante affiche les valeurs demandé.tbEtudiant est un tableau d enregistrement etudiant qui a un champs nom je veux que la liste deroulante affiche les nom des etudiant puis recuperer l etudiant associer a cet nom pour le modifier

[Coussati]

si tu es sûr de ton code, essais de l'encadrer par des begin / end

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
if RadioButton1.Checked then 
begin
 
  for I:= 0 to nbEtudiant do
  begin
         ComboBox1.Items.AddObject('tbEtudiant[I].name',tbEtudiant[I].objet);
  end;
 
end;

sinon tu as testé if RadioButton1.Checked then showmessage('ok') else showmessage('ko'); ?

[chekkal]

bonjour, si j'ai bien compris tu peut faire simple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
procedure tform1.radioboutton1click(sender:tobject);
begin
         if radionboutton1.checked then
         for i:=0 to tbetudiant.count-1 do
             combobox1.items.add(tbetudiant[i]);
end;