Problème avec dbcombobox

j'ai dans mon projet forme vente, qui porte un composant dbcombobox à la liste des items comme suit :
produit1
produit2
produit3
produit4
produit5
j'ai fait ce code pour entrer les données mais ça change pas:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

if DBComboBox1.Items=0 then label1.Caption:='produit1'; dbedit7.DataSource:=datasource1; dbedit7.DataField:='produit1'; if DBComboBox1.Items=1 then label1.Caption:='produit2'; dbedit7.DataSource:=datasource1; dbedit7.DataField:='produit2'; if DBComboBox1.Items=2 then label1.Caption:='produit3'; dbedit7.DataSource:=datasource1; dbedit7.DataField:='produit3'; if DBComboBox1.Items=3 then label1.Caption:='produit4'; dbedit7.DataSource:=datasource1; dbedit7.DataField:='produit4'; if DBComboBox1.Items=4 then label1.Caption:='produit5'; dbedit7.DataSource:=datasource1; dbedit7.DataField:='produit5';

---

Comment faire pour que quand je choisis un item de dbcombobox la caption de label et les sources de dbedit changent. Merci.

Bonjour,

Y a du travail 8O

déjà le code est simplifiable en

Code:

---

1 2 3 4 5 6 7 8 9

dbedit7.DataSource:=datasource1; case DBComboBox1.ItemIndex of 0 : Label1.Caption:='produit1' 1 : Label1.Caption:='produit2' 2 : Label1.Caption:='produit3' 3 : Label1.Caption:='produit4' 4 : Label1.Caption:='produit5' end; dbedit7.DataField:=Label1.Caption;

---

mais pour moi la logique reste incompréhensible

Citation:

---

comment fait pour quand choisie un item de dbcombobox la caption de label et les source de dbedit ce change

---

Encore une fois, je ne comprend pas vraiment la question (une bonne image écran pourrait peut être éclairer la question ?)

Placer le code dans l’événement OnChange de la combo ?