S.A.
Uzun zamandır kafamı kurcalıyordu bende karıştırdım ama içinden çıkamadım. cxGrid de islem tabloma bir harket ekliyorum. Grid üzerinde yeni bir kayıt ekleyerek yapıyorum. burda urun tablosundan bilgi çekmesini istiyorum. Yani URUNADI sütununu LookupCombobox olarak gösteriyorum ve Listsource olarak ta urun tablosunu ayarlıyorum. ama islem harketine ait diğer bilgileri örneğin Birim fiyatı, KDV oranını, Satış fiyatını vs. yani ürün kartında kayıtlı olan diğer bilgileri otomatik olarak islem tablosunun değerlerine aktarsın istiyorum. Biraz uzun bir soru oldu ama inşallah sorunumu iyice anlatabilmişimdir ?
var
sonuc:Variant;
Urun_id:integer;
begin
Urun_id := qryIslem['urun_id']; // Bu değerin LookupCombobx tarafından otomatik atanadığını varsayıyıorum.
sonuc := qryUrunler.Lookup('urun_id',Urun_id,'BirimFiyati;KDV;SatisFiyati');
if not varisNull(sonuc) then
begin
qryIslem.fieldbyname('BirimFiyat').Asdouble := sonuc[0];
qryIslem.fieldbyname('KDV').Asinteger := sonuc[1];
qryIslem.fieldbyname('SatisFiyati').Asdouble := sonuc[2];
end;
end;
S.A.
undefinde ustam teşekkürler. ancak ben cxGrid in üzerinde yapacam bunu. ben bir türlü uyarlayamadım yada bulamadım Onchange olayını. istediğim kayıt satırındaki bir hücrenin LookUpcombobox olayındaki değişiklik. Birde Firebird de yeniyim. IBDataset ile yapıyorum. biraz daha ayrıntılı bilgi verirsen sevinirim.
Merhaba,
1- İhtiyacın olan kolonu (Column) lookupcombobox şeklinde ayarla Bunu kolonun bir özelliği olan properties'ten seç. Seçtikten sonra lookupcombobox'a ait ayarlar gelecek.
2- O ayarlardan Lookupcombobox'ın veri bağlantılarını ayarla.
3- Events sayfasına geç ordan properties'ten onchange olayını bul.
4- Kendi işinin mantığına göre kodları düzenle.
Hangi aşamada takıldığını yazarsan ona göre yardımcı olmaya çalışırım.