ComboBox Seçili Değer Atama

   İyi günler,
Combobox üzerinden seçili index'i veya key değerini almak gibi işlemleri yapabiliyoruz fakat bir combobox'ın index değerini nasıl set edebiliriz bu konu hakkında bir doküman ile karşılaşmadım. Örnek senaryomda veritabanı üzerinden değerler(seçenekler) gelip combobox bileşenine gönderiliyor ve kullanıcı için seçili değer de veritabanına aktarılıyor. Daha sonrasında tekrar veritabanı üzerinden o değeri çekerek başka bir yerde combobox seçili değerini o değer yapmak istiyorum ama combobox için atama işlemlerine ihtiyacım var.

Yazar	Mesaj Konu Arama Topic Seçenekleri Yanıt Yaz Yeni Konu Oluştur Konuyu Yazdır Çeviri Konu
merenefe Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Yeni Üye Kayıt Tarihi: 08 Mayıs 2024 Durum: Aktif Değil Puanlar: 8	Mesaj Seçenekleri Yanıt Yaz Alıntı merenefe Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Konu: ComboBox Seçili Değer Atama Gönderim Zamanı: 13 Haziran 2024 Saat 21:57
	İyi günler, Combobox üzerinden seçili index'i veya key değerini almak gibi işlemleri yapabiliyoruz fakat bir combobox'ın index değerini nasıl set edebiliriz bu konu hakkında bir doküman ile karşılaşmadım. Örnek senaryomda veritabanı üzerinden değerler(seçenekler) gelip combobox bileşenine gönderiliyor ve kullanıcı için seçili değer de veritabanına aktarılıyor. Daha sonrasında tekrar veritabanı üzerinden o değeri çekerek başka bir yerde combobox seçili değerini o değer yapmak istiyorum ama combobox için atama işlemlerine ihtiyacım var.
	Mehmet Eren Efe

Developer Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Forum Yöneticisi Kayıt Tarihi: 14 Haziran 2023 Durum: Aktif Değil Puanlar: 354	Mesaj Seçenekleri Yanıt Yaz Alıntı Developer Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Gönderim Zamanı: 24 Haziran 2024 Saat 16:26
	Merhaba Mehmet, Örnek kod aşağıdadır; var MyForm:TclForm; testCombo : TClComboBox; testLabel :TClLabel; void ComboSelected; var strValue,strKey,strKey2 : String; { strValue = testCombo.GetValueIndex(testCombo.ItemIndex); strKey = testCombo.GetItemIndex(testCombo.ItemIndex); strKey2 = testCombo.Items[testCombo.ItemIndex]; ShowMessage('strValue : '+strValue); //value1 ShowMessage('strKey : '+strKey); //key ShowMessage('strKey2 : '+strKey2); //key ShowMessage('testCombo.ItemIndex : '+IntToStr(testCombo.ItemIndex)); //index } { MyForm = TclForm.Create(Self); testLabel= MyForm.AddNewLabel(MyForm,'testLabel','Select the day'); testLabel.Align=alMostTop; testLabel.StyledSettings = ssFamily; testLabel.TextSettings.FontColor = clAlphaColor.clHexToColor('#820000'); testLabel.TextSettings.Font.Size=20; testLabel.Width = 150; testLabel.Height = 25; testLabel.Margins.Top=50; testLabel.Margins.Left =50; testLabel.Margins.Right =50; testCombo = MyForm.AddNewComboBox(MyForm,'testCombo'); testCombo.Align = alTop; testCombo.Width = 150; testCombo.Margins.Top=10; testCombo.Margins.Left =50; testCombo.Margins.Right =50; testCombo.AddItem('Monday','01'); testCombo.AddItem('Tuesday','02'); testCombo.AddItem('Wednesday','03'); testCombo.AddItem('Thursday','04'); testCombo.AddItem('Friday','05'); testCombo.AddItem('Saturday','06'); testCombo.AddItem('Sunday','07'); testCombo.ItemIndex = 3;//Seçilen indesk MyForm.AddNewEvent(testCombo,tbeOnChange,'ComboSelected'); MyForm.Run; }