Listbox icinde arama yaptirmak

[Viper]

Sorunum cok buyuk delphi ustalarini gerektiriyor. Ben isin icinden cıkamadim. Bir listbox dusunun. icinde gotonearest gibi bir arattirma yaptirmak istiyorum. Ayni winampin playlistinde aratma yapiyor gibi. Bunu nasil becerebilirim. Ornegin listbox satirlarinda sirayla mp3 ler dusunun.

Ornegin Ferdi Tayfurun sarkilari. Sirayla alt alta
Ferdi Tayfur - Bilmemne
Ferdi Tayfur - Bilmemkim

ben edite Ferdi yazinca bu listboxta filtreleme yapmam lazim. Umarim anlatabilmsisimdir. Saygılar

[freeman35]

Listbox class ına yada türetildiği class ların detaylarına bakmak lazım. Aklıma gelen yöntem ise şu. Tam listenin olduğu bir record array oluştur. Liste yi ise bu array içinden oluştur. yani basit bir döngü kur ve edit ten gelen text i pos ile arttır, değer 0 dan büyük ise listeye ekle

Kolay gele

[Viper]

Tamam sorunu cozdum. Su an arama yaptirabiliyorum. Bir sorunum daha cikti yalniz. Bilirsiniz programcıların sorunlari bitmez. Bu sefer ki sorunum satır sayısı sorunu. Listbox belli satırdan fazlasini almiyor. Satır limiti varmi listboxlarda ? Baska alternatif ne kullanabilirim. Tesekkurler

[freeman35]

memorytable olabilir, link i forumda olucak
kolay gele

[Viper]

Hocam ondada sınır yokmus. Ben Opendialog ile dosya ac yapiyordum. CTRL + A ile secip eklemeye calisiyordum. Bir defada belirli dosyayi ekliyor. Daha sonra ona ekleme yapabiliyorum. Sorun Bu Tumunu sectigimde hepsini eklememesi

[freeman35]

soruları daha detaylı sormanı tavsiye ederim ne yazdığın kodu görüyorum nede aklından geçenleri bilabirim. dolayısıyla üreteceğim alternatiflerde sınırlı olacaktır.
Problemin senin kodunda ozaman muhtemelende kurduğun döngünün koşullarında, breakpoint koyup satırları tek tek çalıştır
Kolay gele

[Viper]

forumda Listbox ve opendialog var

procedure TForm1.Button3Click(Sender: TObject);
var
i:integer;
begin
OpenDialog1.Filter :=
'Mp3 Muzik Dosyasi (*.Mp3)|*.Mp3|All files (*.*)|*.*';


if OpenDialog1.Execute then
label2.Caption:=Opendialog1.filename;
for i := 0 to openDialog1.Files.Count-1 do
listbox1.Items.Add(openDialog1.Files);
end;

Opendialog penceresi acılıp CTRL + A ile itemleri sectigimde ( Opendialog un Multiselect ozelligi acik) belirli sayıda item ekliyor listbox a . ornegin 200-300. 3000-4000 mp3 ekleme yapamiyorum. Bu neden kaynaklanır. Sorunum su an bu. Tesekkurler