Ana içeriğe atla

Combobox'ı dbLookupCombobox gibi kullanmak

Comboboxta string değerler gözükürken kullanıcının seçimine göre seçilen stringe ait ID değerine ulaşmak isteriz. Bunun için genelde dblookupcombobox kullanılır. Standart combobox ile bu işlemi halletmek isteyen kullanıcılar bu yöntemi kullanabilirler.... Degerleri combobox a eklemek icin :
Combobox1.items.AddObject('Rize', TObject(53)); Combobox1.items.AddObject('Ankara', TObject(6)); Combobox1.items.AddObject('İstanbul', TObject(34));
Seçilen değerin ID alanına ulaşmak için de :
Deger := Integer(Combobox1.items.Objects[Combobox1.ItemIndex]);

Yorumlar

Adsız dedi ki…
Eline Koluna Sağlık Çok İşime Yaradı.......
Adsız dedi ki…
Merhaba ,
yazılarınızı çok güzel devam etmesini diliyorum bu yazınızıda çok beğendim.Bu tür delphinin inceliklerini anlatan daha güzel yazıları bekliyoruz.
Adsız dedi ki…
Merhabalar, DBlookupComboBox yerine Söylediğiniz gibi ComboBox ı kllanmak istiyorum ,
Verdiğiniz kodları aşağıdaki şekilde yazdım Ancak, ComboBox içine hiçbirşey gelmedi.
Nerede hata yapıyorum anlayamadım. tşk..

procedure TForm3.ComboBox1Click(Sender: TObject);
begin
Combobox1.items.AddObject('Rize', TObject(53));
Combobox1.items.AddObject('Ankara', TObject(6));
Combobox1.items.AddObject('İstanbul', TObject(34));

end;

Bu blogdaki popüler yayınlar

Yazılımı Oluşturan Bileşenler Nelerdir?

Yazılımı oluşturan bileşenlerden daha önce söz etmiştik. Şimdi bu bileşenlerin neler oldukları üzerinde biraz duralım. Yazılımı oluşturan bileşenler = Mantık + Veri + Belge + İnsan + Program. Bu bileşenlerin az çok neler olduğunu, neleri kapsadığını biliyoruz ama biz yine de kıyısından köşesinden açıklayalım. Zaten bu yazıdaki asıl amaç yazılım bileşenlerinden belgelemenin yerini ve önemi (dökümantasyon) vurgulamak. Mantık = Yazılım herşeyden önce bir işin bilgisayar aracılığı ile yapılması amacına yöneliktir. Bu nedenle bilgisayarlaştırılmak istenen işin mevcut mantığı bir şekilde yazılıma da yansılıtılmak zorundadır. Veri = Her tür yazılım mutlaka bir veri üzerinde çalışmak durumundadır. Veri işlemeyen yazılımın geliştirilmesi söz konusu değildir. Söz konusu olan veri dış ortamdan alınabileceği gibi yazılımın içerisinde de üretilebilir. Zaten yazılımın temel amacı veriyi bilgiye dönüştürmektir. İnsan = Doğal olarak yazılımın insan bileşeni iki boyutludur. Yazıl

Yunus sen bu dünyaya niye geldin?

Göçtü Kervan Ah nice bir uyursun uyanmaz mısın Göçtü kervan kaldık dağlar başında Çağrışı tellallar inanmaz mısın Göçtü kervan kaldık dağlar başında Emr-i hac göçeli hayli zamandır Muhammed cümleye dindir imandır Delilsiz gidilmez yollar yamandır Göçtü kervan kaldık dağlar başında Yunus sen bu dünyaya niye geldin Gece gündüz Hakkı zikretsin dilin Enbiyaya uğramaz ise yolun Göçtü kervan kaldık dağlar başında Yunus Emre

Leyse li'l-insâni illâ mâ seâ

"Leyse li'l-insâni illâ mâ seâ" derken Hudâ; Anlamam hiç meskenetten sen ne beklersin daha? Mehmet Akif Ersoy / Durmayalim Leyse li'l-insâni illâ mâ seâ : Necm Süresi 39. Ayet. [İnsan için ancak çalıştığı vardır.] Meskenet: 1 . Miskinlik, beceriksizlik. 2 . Yoksulluk, fakirlik. (Türk Dil Kurumu) Olay zaten yeterince acik. Yan gelip yatma kardesim. Calis. Bu misralar yazildigi donemde bu anlami tasiyordu fakat zaman ilerledikce baska bir gercegi de gozler onune seriyor.Gerci bu gercek cok kapsamli bir kac satirla anlatilabilecek bir sey degil kaldiki benim bilgim de buna yeterli degil zaten. Ben giris cumlelerini verebilirim gerisini arastirmak yaziyi okuyanlara kalmis. (Matrix gibi bisey oldu bu yaw. Neo'nun kahinle bulusup yanindan ayrildiktan sonra Morpheus ile konusma sahnesi.) Yani kisaca sunu demek istiyorum. Ben bu misrayi ilk okudugumda hic birsey anlamadim. Bu misralari anlayabilmek icin kuran mealine ve turkce sozluklere bakmak zorunda k