Salut ; Je travaille avec D7 , et j'ai deux composants :un Dbcombobox1 et un Label1
Items du dbcombobox1 contient 'a' , 'b' , 'c' .
je voudrais changer la valeur caption d'un label1 quand dbcombobox1 change d'item.
Voici mon code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
procedure TForm1.DBComboBox1Change(Sender: TObject);
begin
if dbcombobox2.Itemindex = 0 then Label5.Caption:= 'a'
else label1.Caption :='';
 
if dbcombobox2.Itemindex = 1 then Label5.Caption:= 'b'
else label1.Caption :='';
 
if dbcombobox2.Itemindex = 2 then Label5.Caption:= 'c'
else label1.Caption :='';
end;
end.
Le problème c'est que quand je met item0 et item1 du dbcombobox1 , label1 ne change pas de caption , par contre item2 change le caption du label1 en 'c' . J'èspere que je me suis bien fait comprendre .Merci