Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
combobox veriyi edit text gösterme
#1
Merhabalar

edit5.Text:=inttostr(ComboBox3.ItemIndex);

bu sekilde sadece index numarasını gösteriyor ben bilgiyi nasıl görebilirim.
Cevapla
#2
Sanırım yapmak istediğiniz comboboxdaki texti almak.
edit5.text := ComboBox3.text;
Cevapla
#3
Merhaba,
@frmman'a ilave olarak; aşağıdaki gibi bir kod kullanarak, seçili item değerini alabilirsiniz.
edit5.Text:=ComboBox3.Items[ComboBox3.ItemIndex];
While true do; Hayat döngüsü, kısır değildir! Yapılan bir yanlış, o döngünün dışına çıkmanızı sağlayacaktır.
WWW
Cevapla
#4
(28-04-2019, Saat: 20:09)Fesih ARSLAN Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.Merhaba,
@frmman'a ilave olarak; aşağıdaki gibi bir kod kullanarak, seçili item değerini alabilirsiniz.
edit5.Text:=ComboBox3.Items[ComboBox3.ItemIndex];

TEŞEKKÜRLER TAM İSTEDİĞİM GİBİ İYİ ÇALIŞMALAR
Cevapla
#5
Merhaba arkadaşlar şöyle bir soru sormak istiyorum. Combobox'a veri girmeye başlarken kendi içinde bağlı olduğu veri tabanı alanında filtreleme yapıp benzerlerini aşağıya açılır listede göstermesini istiyorum. Yani aranan kelimede tam eşleşme gerçekleştiğinde listede sadece o kelime görünecek çalıştığım projeye benzer bir programda böyle bir şey var ama ben yapmayı beceremedim.Cevaplarınız için şimdiden teşekkür ediyorum.
Cevapla
#6
(23-08-2019, Saat: 14:41)bünyamin68 Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.Merhaba arkadaşlar şöyle bir soru sormak istiyorum. Combobox'a veri girmeye başlarken kendi içinde bağlı olduğu veri tabanı alanında filtreleme yapıp benzerlerini aşağıya açılır listede göstermesini istiyorum. Yani aranan kelimede tam eşleşme gerçekleştiğinde listede sadece o kelime görünecek çalıştığım projeye benzer bir programda böyle bir şey var ama ben yapmayı beceremedim.Cevaplarınız için şimdiden teşekkür ediyorum.

procedure TForm1.FormCreate(Sender: TObject);

begin
FComboStrings := TStringList.Create;
  FComboStrings.Add('Hatay');
  FComboStrings.Add('Adana');
  FComboStrings.Add('İstanbul');
  FComboStrings.Add('Samsun');
  FComboStrings.Add('Trabzon');
  FComboStrings.Sorted := True;
  ComboBox1.AutoComplete := False;
  ComboBox1.Items.Text := FComboStrings.Text;
  ComboBox1.Sorted := True;
end;



procedure TForm1.FormDestroy(Sender: TObject);
begin
FreeAndNil(FComboStrings);
end;

procedure TForm1.ComboBox1Change(Sender: TObject);
var
  Filter: string;
  i: Integer;
  idx: Integer;
begin

  Filter := ComboBox1.Text;
  ComboBox1.DroppedDown := True;
  ComboBox1.Text := Filter;
  ComboBox1.SelStart := Length(Filter);

  for i := 0 to FComboStrings.Count - 1 do
    if SameText(LeftStr(FComboStrings[i], Length(ComboBox1.Text)), ComboBox1.Text) then
    begin
      if ComboBox1.Items.IndexOf(FComboStrings[i]) < 0 then
        ComboBox1.Items.Add(FComboStrings[i]);
    end
    else
    begin
      idx := ComboBox1.Items.IndexOf(FComboStrings[i]);
      if idx >= 0 then
        ComboBox1.Items.Delete(idx);
    end;
end;


Selam Ufak Bir araştırma ile bunu buldum.İşene yarar diye düsünüyorum. Combobox runtime doldurulmuş.Sen Kayıtları dbden cekiyorsundur.Create olayındakıleri silebilirsin.Kolay gelsin
Cevapla
#7
(23-08-2019, Saat: 16:47)HuseyinF Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.
(23-08-2019, Saat: 14:41)bünyamin68 Adlı Kullanıcıdan Alıntı: Linkleri Görebilmeniz İçin Üye Olmanız Gerekiyor. Üye Olabilmek İçin Lütfen Buraya Tıklayınız.Merhaba arkadaşlar şöyle bir soru sormak istiyorum. Combobox'a veri girmeye başlarken kendi içinde bağlı olduğu veri tabanı alanında filtreleme yapıp benzerlerini aşağıya açılır listede göstermesini istiyorum. Yani aranan kelimede tam eşleşme gerçekleştiğinde listede sadece o kelime görünecek çalıştığım projeye benzer bir programda böyle bir şey var ama ben yapmayı beceremedim.Cevaplarınız için şimdiden teşekkür ediyorum.

procedure TForm1.FormCreate(Sender: TObject);

begin
FComboStrings := TStringList.Create;
  FComboStrings.Add('Hatay');
  FComboStrings.Add('Adana');
  FComboStrings.Add('İstanbul');
  FComboStrings.Add('Samsun');
  FComboStrings.Add('Trabzon');
  FComboStrings.Sorted := True;
  ComboBox1.AutoComplete := False;
  ComboBox1.Items.Text := FComboStrings.Text;
  ComboBox1.Sorted := True;
end;



procedure TForm1.FormDestroy(Sender: TObject);
begin
FreeAndNil(FComboStrings);
end;

procedure TForm1.ComboBox1Change(Sender: TObject);
var
  Filter: string;
  i: Integer;
  idx: Integer;
begin

  Filter := ComboBox1.Text;
  ComboBox1.DroppedDown := True;
  ComboBox1.Text := Filter;
  ComboBox1.SelStart := Length(Filter);

  for i := 0 to FComboStrings.Count - 1 do
    if SameText(LeftStr(FComboStrings[i], Length(ComboBox1.Text)), ComboBox1.Text) then
    begin
      if ComboBox1.Items.IndexOf(FComboStrings[i]) < 0 then
        ComboBox1.Items.Add(FComboStrings[i]);
    end
    else
    begin
      idx := ComboBox1.Items.IndexOf(FComboStrings[i]);
      if idx >= 0 then
        ComboBox1.Items.Delete(idx);
    end;
end;


Selam Ufak Bir araştırma ile bunu buldum.İşene yarar diye düsünüyorum. Combobox runtime doldurulmuş.Sen Kayıtları dbden cekiyorsundur.Create olayındakıleri silebilirsin.Kolay gelsin

teşekkür ederim kardeşim işimi gördü.
Cevapla


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  Syntax Highlighter text editör yapımı vedat33 5 206 04-10-2019, Saat: 09:59
Son Yorum: SimaWB
  Dbgrid icerisinda combobox kullanma TheEAK 7 266 23-09-2019, Saat: 09:58
Son Yorum: TheEAK
  Edit'i Combobox gibi kullanmak bünyamin68 7 371 19-09-2019, Saat: 22:20
Son Yorum: SimaWB
  Edit Sayı Girme OZCANK 3 154 15-09-2019, Saat: 01:28
Son Yorum: Aktolgali
  Edit Sayı Çevirme OZCANK 13 434 10-09-2019, Saat: 15:43
Son Yorum: faktoral



Konuyu Okuyanlar: 1 Ziyaretçi