Delphi Can

Orjinalini görmek için tıklayınız: Comboboxa girilen değere göre veri çekme.
Şu anda (Arşiv) modunu görüntülemektesiniz. Orjinal Sürümü Görüntüle internal link
Merhaba arkadaşlar çalışmış olduğum bir projemde 5 adet combobox kullanıyorum yapmak isteğim işlem şu ben birinci comboboxa veri tabanında belirli sütundan veri alıyorum.Benim bu seçtiğim veriye göre diğer comboboxlara aynı tabloda bağlı oldukları sütunların en son eklenen verilerini otomatik gelmesini istiyorum.örneğin ürünler tablom var ben ürünün combobox1 de stok kodunu seçtiğimde combobox2 ye ürünün adı,combobox3 e ürünün alış fiyatı combobox4 e ürünün satış fiyatı,combobox5 e ürünün adet bilgisinin otomatik gelmesini istiyorum ya da combobox yerine editlerede olabilir.Bunu nasıl yapabilirim yardımlarınızı bekliyorum.

Bu arada projem çok kapsamlı bir proje değil basit ama çözülünce işime yarayacak bir proje.


Tavsiye olarak;
Sizce bunu farklı tablolarda ilişki oluşturarak yapmam mı daha mantıklı.

Cevaplarınız için şimdiden teşekkür ediyorum.
Neden adi, fiyatı vs. combobox ta ? Edit e yazsanız ?
(05-10-2019, Saat: 10:40)esistem Adlı Kullanıcıdan Alıntı: [ -> ]Neden adi, fiyatı vs. combobox ta ? Edit e yazsanız ?

Haklısınız belirtmedim ben onu örnek olarak vermiştim benim hatam mesajımda bilgi eksikliği var.
Comboboxun onchange olayına gerekli yerleri değiştirip eklersiniz


With ADOQuery1 do
begin
 close;
 sql.clear;
 sql.add('SELECT id,urunadi,urunalisfiyati, urunsatisfiyayi FROM tablon WHERE tablonda bulunan comboboxa çektiğin alanın adı=:alan');
 Params.parambyname('alan').Value := combobox.text;
 open;
 begin
edit1.text  :=  ADOQuery1.fieldbyname('urunadi').AsString;
edit2.text  :=  ADOQuery1.fieldbyname('urunalisfiyati').AsString;
edit3.text  :=  ADOQuery1.fieldbyname('urunsatisfiyati').AsString;
 end;
end;
bkantur Hocam çok teşekkür ediyorum vermiş olduğunuz kod çalıştı fakat bir sorunum var. Şöyle ki veri tabanım da aynı üründen birkaç tane var ben en son kaydedilen bilgiyi almak istiyorum bu durumda ne yapmam gerekiyor.