combobox'a veritabanından veri akatrma

[kazimates]

frm create ederkn veritabanın içinde ki ozelkodu alanında ki verileri combobox un itemlrına ekleyip form üzerinde combobox u tıkladığımda alt alta göstermesini istiyorum. size göre aşağıda ki kodda ne yanlış varki bunlar comboboxda gösterilmiyor olabilir?

Kod: Tümünü seç

while not ADOQCari.eof do
   begin
     CBCariKodu.items.add(ADOQCari.fieldbyname('OZELKODU').asstring);
     ADOQCari.next;
   end;

[kazimates]

sorunumu aşağıdaki kodla çözdüm

Kod: Tümünü seç

CBCariKodu.Items.clear;
   CBCariUnvani.Items.clear;

   while not ADOQCari.eof do
   begin
      CBCariKodu.ItemIndex:=(ADOQCari.fieldbyname('RECORDNO').asinteger);
      CBCariKodu.items.add(ADOQCari.fieldbyname('SPECODE').asstring);
      CBCariUnvani.ItemIndex:=(ADOQCari.fieldbyname('RECORDNO').asinteger);
      CBCariUnvani.Items.Add(ADOQCari.FieldByName('DEFINITION').asstring);
      ADOQCari.next;
   end;
   CBCariKodu.ItemIndex:=0;
   CBCariUnvani.ItemIndex:=0;

[aslangeri]

s.a.
arkadaşım döngünün içinde itemindexleri set etmene gerek yok.