db combobox tan çıkarken ....

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
efkan
Üye
Mesajlar: 155
Kayıt: 31 Oca 2004 07:47
Konum: Tekirdağ
İletişim:

db combobox tan çıkarken ....

Mesaj gönderen efkan »

öncelikle herkese iyi günler...
formumda dbcombobox1 ve dbedit1 var.. bir tabloda da bu iki alanın verilerini tutuyorum.. dbcombobox1 in itemlerini ekledim(tablodan sorguyla).
dbcombobox1 in içerisinden bir item seçilecek ve çıkışta dbedit1 e tablodan seçilen iteme karşılık gelen kodu yazacak.. ben bunu şöyle yapmayı denedim.
dbcombobox1 in onexit eventine

" table3.Filter:=QuotedStr(dbcombobox1.Text);
dbedit3.Text:=table3.Filter; "
şeklinde yazdım.. ama hata verdi hatanın sebebini yazabilecek arkadaşlardan yardım bekliyorum.. Herkese çalışmalarında başarılar..
Bilgisayar Programcısı/Analyst ve Sistem Yöneticisi
Kullanıcı avatarı
gkimirti
Admin
Mesajlar: 1956
Kayıt: 02 Eyl 2003 04:44
Konum: İstanbul

Mesaj gönderen gkimirti »

dbedit ve dbcombo aynı datasete baglı ise
dbcombo da bir kayıt secince editte de o kayıta konumlanır
ikisinede aynı alnı verin o zaman
ne yapmak istediginiz pek anlasılmıyo yada ben anlamadım
ÜŞENME,ERTELEME,VAZGEÇME
Kullanıcı avatarı
aslangeri
Moderator
Mesajlar: 4322
Kayıt: 26 Ara 2003 04:19
Konum: Ankara
İletişim:

Mesaj gönderen aslangeri »

verdiği hata mesajınıda yazarsan yardım etmemiz daha kolay olur.

tablonun edit yada insert modunda olup olmadığınıda kontrol etmelisin.

kodu şu şekilde değiştirsen belki çalışır.

Kod: Tümünü seç

  dbedit3.Text:=dbcombobox1.Text;
Duyduğun Şeylerin Söylediklerim Olduğuna Eminim Ama
Anladığın Şeylerin Anlatmak İstediklerim Olduğuna Emin Değilim
Kullanıcı avatarı
efkan
Üye
Mesajlar: 155
Kayıt: 31 Oca 2004 07:47
Konum: Tekirdağ
İletişim:

merhabalar...

Mesaj gönderen efkan »

ben dbcombobox1 deki yazıyı dbedite yazdırmak istemiyorum.Afedersiniz anlatamadım karıştırdım sanıtım.
dbcombobox1 deki textin tablodaki kod karşılığını dbedite yazdırmak istiyorum.Ne yapmak istediğimi kısaca yazıyorum. firmaadı tanımlama tablomdan dbcomboboxın itemlerini ekledim. şimdi aynı tabloda şu şekilde kodlar var
firmaadi fimrakodu
-------------- --------------
bilkont a.ş. 01000
örma tekstil a.ş. 01001

burdan dbcombobxtan firma isimlerini sectiriyorum yandaki dbeditede firmakodunu gösterticem :) ve tabi sonrada kaydet butonuna bastığımda kaydettiricem..
sanırım GKIMIRTI hocam ne yapmak istediğimi anladı.. dataset kullanmıyordum ama deneyicem teşekkürler..
Bilgisayar Programcısı/Analyst ve Sistem Yöneticisi
Kullanıcı avatarı
aslangeri
Moderator
Mesajlar: 4322
Kayıt: 26 Ara 2003 04:19
Konum: Ankara
İletişim:

Mesaj gönderen aslangeri »

Şimdi biraz daha açık oldu.
sana önerebileceğim iki yöntem var ama dataset kullanmadığına göre sanıtım birinci yöntemi terih edersin.


1.yöntem ikinci bir dbcombobox kullan 1.comboboxa firmaadını eklerken ikinci comboboxa firma kodunu ekle. Biri değiştiği zaman diğerinin itemindex {umarım vardır şu an bakamıyorum} inide aynısı yaparsın.

Bu yöntem biraz vakit alabilir.

2.Yöntem ise dblookup combobox kullan.

Böylelikle firmalar tablosundan seçili kaydın kodunu aynı tabloya bağlı bir diğer editte anında görebilirsin. hiç kod yazmana gerek yok.

ben olsan ikinci yöntemi seçerdim. :wink:
Duyduğun Şeylerin Söylediklerim Olduğuna Eminim Ama
Anladığın Şeylerin Anlatmak İstediklerim Olduğuna Emin Değilim
Kullanıcı avatarı
m_ekici
Kıdemli Üye
Mesajlar: 563
Kayıt: 11 Haz 2003 06:49
Konum: Adana
İletişim:

RxDBLookupCombo1

Mesaj gönderen m_ekici »

RxLib paketinde RxDBLookupCombo Componenti var.

Kod: Tümünü seç

RxDBLookupCombo.DataField=T1_KAYITNO*
RxDBLookupCombo.DataSource=DataSource1

RxDBLookupCombo.LookUpDisplay=UNVANI;KAYITNO
RxDBLookupCombo.LookUpField=T2_KAYITNO*
RxDBLookupCombo.LookUpSource=DataSource2
Burada DataSource2 ile bağlı Table'daki UNVAN ve KAYIT NO Alanları listeleniyor. Herhangi bir kaydı seçtiğinde DataSource1 ile bağlı TAble ın T1_KAYITNO alanına T2_KAYITNO değerini kendisi atıyor.

veya

RxDBLookupCombo.DataField=
RxDBLookupCombo.DataSource=

alanlarını boş bırakırsın onexit de

RxDBLookupCombo.Keyvalue(RxDBLookupCombo.LookUpField=T2_KAYITNO*) değerini istediğin yere aktarırsın.
Cevapla