Szukanie w ListBox

Odpowiedz Nowy wątek
2003-11-04 16:05
0

Napisałem program, który wczytuje do Listbox'a nazwy plików o rozszerzeniu txt. Chodzi mi o to aby po wpisaniu nazwy do pola edit, w listboxie pojawiły się pliki o podobnej nazwie. Np wpisuje pole a w listboxie pojawia się: polemika, polemizować itp.


"Nobody will ever need more than 640k RAM!" -- Bill Gates, 1981
"Windows 95 needs at least 8 MB RAM." -- Bill Gates, 1996
"Nobody will ever need Windows" -- logical conclusion

Pozostało 580 znaków

2003-11-04 16:14
0
  1. Duuuża baza wyrazów i ich procentowe podobieństwo

  2. Sztuczna sieć neuronowa

<font color="blue">[</span><font color="red">ADD</span><font color="blue">]</span>
HEHE... To ja nie skumałem:)

Np wpisuje pole a w listboxie pojawia się: polemika, polemizować itp.

Wziąłem, że wpisuje coś do tego pola... :) Gdyby użył cudzysłowiu lub apostrofu, byłoby to bardziej zrozumiałe...


Pozostało 580 znaków

2003-11-04 21:15
0

Ja bym to zrobil w prosty (banalny) sposob, nie wiem tylko, czy o to ci chodzi:

var S : String;
I:Integer;
begin
S:=Edit1.Text;

For I:=0 to ListBox1.Items.Count-1 do
                 If Pos(S, ListBox1.Items[i])>0 then
                                  ListBox2.Items.Add(ListBox1.Items[i]);
end;

[cya] [browar]

Pozostało 580 znaków

Odpowiedz
Liczba odpowiedzi na stronę

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0