delphi: ListBox içerisinde Arama Yapmak için - Delphi / Kylix Webmaster bilgi bankası, knowledge base Webmaster Araçları

AnaSayfa > Delphi / Kylix > delphi: ListBox içerisinde Arama Yapmak için
Kategori: Delphi / Kylix
Gönderen: Admin
Tarih: 2008-12-07
Puan: 3   Puan:3 | Katılımcı:1 | Katılımcı : 1
Okunma: 4142
  
 
1 puan 2 puan 3 puan 4 puan 5 puan 6 puan 7 puan 8 puan 9 puan 10 puan

Buton Click yordamına aşağıdaki kodlarımızı yazıyoruz.

procedure TForm1.Button1Click(Sender: TObject);
var
ara: string;
begin
ara:= ´osman´;
if SendMessage(ListBox1.Handle, lb_selectstring, - 1, Longint(PChar(ara))) <> LB_ERR then
ShowMessage(´Bulunulanlar Kayıtlar : ´ + IntToStr(ListBox1.ItemIndex));
end;







Yorumlar
Henüz Kimse Yorum Yapmamış, ilk yorumu siz ekleyin!
Yorum Ekleme Aparatı
Yorum Eklemek için lütfen sol menuden giris yapınız..
Toplam 0 yorum listelendi.