listbox a veritabanını alanlarından birini okutmak

[mikailornek]

arkadaşlar bir listboxa veritabanınn alanlarından birini okutmak istiyorum ve bu alan isimleri abrındırıyor ben burdan bir ismi tıkladığımda aynı form üzerinde bulunan dbedit lerdeki bilgilerde değişsin istiyorum yardımcı olabilirseniz sevinirim

[fahrettin]

Anladigim kadari ile listbox'in icine bir tablodaki bir alanin degerlerini doldurmak istiyorsunuz ve sonra da hangi satira tiklarsanız o satira ait muhtemel diger alanlarin degerlerini de DBedit bilesenlerinde gostermek istiyorsunuz.
Oncelikle DBEdit bilesenlerini bir tabloya baglayin. Listbox'in icini doldurmak icin de bir query ile bir dongu kurup doldurma isini yapın. Sonra da listbox'tan secilen alanin degerini alarak

Kod: Tümünü seç

 ListBox1.Items(ListBox1.ItemIndex)

ki bu kod ile alabilirsiniz sonra da DBEditlerin bagli oldugu dataset üzerinde FindKey ile aratin. Tabi dataset'in doldurdugunuz alana gore indexinin oldugunu ve bu indexin secili oldugunu varsayiyorum.

Doldurma isi icin kapaca soyle bir kod isinizi gorur.

Kod: Tümünü seç

  with TQuery.Create(Self) do
  begin
    DatabaseName:='DBVERITABANIM'; // Database'inizin alias'i
    SQL.Add('Select ALAN1 from TABLO');
    Open;
    ListBox1.Items.Clear;
    while not Eof() do
    begin
      ListBox1.Items.Add(FieldByName('ALAN1').AsString);
      Next;
    end;
    Free;
  end;

Kolay gelsin....

[abdulkadir]

Valla Fahrettin Abi İlac gibi Adamsın
Allah Seni Basımızdan Eksik etmesin.

[fahrettin]

yok canim estağfirullah......
Amman hocam maşallah de. Sonra bizim işler filan açılır, yoğunlaşırız foruma da uğrayamaz oluruz. Ortam ve arkadaşlar güzel olunca bizi de çekiyor kendine. Yoksa marifet bizde degil..