Bonjour,
J'ai l'habitude d'utiliser un combobox en VB pour afficher tous les champs d'un enregistrement d'une table dans des composants Edit(ou DBEdit) mais avec Delphi je bloc
Cette methode fonctionne bien pour remplir seulement le combobox depuis une table de base de données
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 procedure TForm1.ComboBox1Change(Sender: TObject); begin Adotable2.open ; Adotable2.First; while not Adotable2.Eof do Begin //combobox1.Items.Add(Adotable2['Id_prod']); // Methode 1 //combobox1.Items.Add(Adotable2.FieldByName('Designation_cot').AsString); // Methode 2 combobox1.items.Add(Adotable2.Fields.Fields[0].asstring +' / '+Adotable2.Fields.Fields[1].asstring +' / '+ Adotable2.Fields.Fields[2].asstring); //Metode pour afficher plusieurs champs dans le Combobox Adotable2.Next; End; end;
J'aimerai quand je selection une reférence produit depuis le combobox, cela affiche tous autres renseignements composant ce dernier comme dans cette image
![]()
Partager