Ładny brzuch
[DELPHI]
Jak najprociej zrobic wyszukiwarke listbox z uzyciem Edit1 i buttona szukaj ?
Jestem poczatkujacy bawie sie w delphi niecale 2 tyg wiec prosze o zrozumienie i jesli mozecie zamiescic dokladniejsza instrukcje co gdzie jak zrobic.
Czytaem kilka tematow z tym zwiazanych ale nie znalazlem tego co chcialem.
Pomocy ! Z gory thx
Uytkownik migajek edytowa ten post 17 listopad 2005, 16:42
Najprociej to wykorzysta metod ListBoksa :) ListBox1.Items.IndexOf('tu jaki tekst') zwraca Ci -1, jeli tekstu w ListBoksie nie ma, albo indeks pozycji, jeli co si znalazo :) W innych przypadkach dajesz prost ptl for:
procedure szukaj(); var i, j: Integer; s: String; begin s := AnsiUpperCase(Edit1.Text); j := -1; for i := 0 to ListBox1.Items.Count - 1 do if Pos(s, AnsiUpperCase(ListBox1.Items[i]) > 0 then j := i; if j > -1 then ShowMessage('Znaleziono!'); end;
Lepiej byoby repeat albo while, ale to zrb jako zadanie domowe :)
Uytkownik Kokoszek edytowa ten post 17 listopad 2005, 16:20
Tzn jesli chodzi o ta 1 metode latwiejsza :
ListBox1.Items.IndexOf('tu jaki tekst')
to gdzie mam ten kod wstawic i co mam wpisac w "jakis tekst" bo sie nie moge zabardzo polapac ;/
Za malo jeszcze siedze w Delphi i dlatego mam takie problemy.
-----------------------------------------------------------------------------------------
Ja mam powiedzmy 3 wiersze w Listbox : aaa, bbb, ccc
i wstawiam Edit1 i Button.
Chce tak zrobic zeby jak wpisze w okienko Edit1 "aaa" i klikajac na button "szukaj" to zeby mi sie podswietlilo to "aaa" na ListBoxie.
Pomoe kto ?
if ListBox1.Items.IndexOf(Edit1.text) > -1 then ListBox1.ItemIndex:=ListBox1.Items.IndexOf(Edit1.text);
najpierw sprawdzamy czy zwrocona wartosc jest wieksza od -1 (jesli wynosi -1 to znaczy ze nie znaleziono tekstu)
potem ustawiamy ItemIndex (czyli zaznaczenie) na znaleziona linie...
Dzieki. Wszystko dziaa a mam jeszcze pytanko.
Najgorsze jest to ze musze wpisac cale wyrazenie i z takich samych liter zeby mi podswietlilo, powiedzmy : Adam Mickiewicz
Zeby mi podwietlilo musze wpisac calosc z takimi samymi znakami a dalo by rade by wpisac tylko Adam i zeby podswietlilo caly wiersz ? i powiedzmy nie bralo pod uwage wielkosc liter ?
Dzieki. Wszystko dziaa a mam jeszcze pytanko.
Najgorsze jest to ze musze wpisac cale wyrazenie i z takich samych liter zeby mi podswietlilo, powiedzmy : Adam Mickiewicz
Zeby mi podwietlilo musze wpisac calosc z takimi samymi znakami a dalo by rade by wpisac tylko Adam i zeby podswietlilo caly wiersz ? i powiedzmy nie bralo pod uwage wielkosc liter ?
Wszystko ok !!! Dzieki za pomoc. Kod z gowy i wszystko dziaa niele ;)
To juz moje ostatnie pytanko :
Jak narazie znajduje mi pierszy wyraz, powiedzmy mam wiersz "Adam Mickiewicz" wpisze mickiewicz i nie znajdzie, jak wpisze adam to znajdzie.
Co mam zmienic lub doda by znajdowalo mi tez 2 wyraz z tego samego wiersza ?
poczytaj sobie w Faq'u
Wszystko ok !!! Dzieki za pomoc. Kod z gowy i wszystko dziaa niele ;)
To juz moje ostatnie pytanko :
Jak narazie znajduje mi pierszy wyraz, powiedzmy mam wiersz "Adam Mickiewicz" wpisze mickiewicz i nie znajdzie, jak wpisze adam to znajdzie.
Co mam zmienic lub doda by znajdowalo mi tez 2 wyraz z tego samego wiersza ?
Dzieki
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
Jak najprociej zrobic wyszukiwarke listbox z uzyciem Edit1 i buttona szukaj ?
Jestem poczatkujacy bawie sie w delphi niecale 2 tyg wiec prosze o zrozumienie i jesli mozecie zamiescic dokladniejsza instrukcje co gdzie jak zrobic.
Czytaem kilka tematow z tym zwiazanych ale nie znalazlem tego co chcialem.
Pomocy ! Z gory thx
Uytkownik migajek edytowa ten post 17 listopad 2005, 16:42
Najprociej to wykorzysta metod ListBoksa :) ListBox1.Items.IndexOf('tu jaki tekst') zwraca Ci -1, jeli tekstu w ListBoksie nie ma, albo indeks pozycji, jeli co si znalazo :) W innych przypadkach dajesz prost ptl for:
procedure szukaj(); var i, j: Integer; s: String; begin s := AnsiUpperCase(Edit1.Text); j := -1; for i := 0 to ListBox1.Items.Count - 1 do if Pos(s, AnsiUpperCase(ListBox1.Items[i]) > 0 then j := i; if j > -1 then ShowMessage('Znaleziono!'); end;
Lepiej byoby repeat albo while, ale to zrb jako zadanie domowe :)
Uytkownik Kokoszek edytowa ten post 17 listopad 2005, 16:20
Tzn jesli chodzi o ta 1 metode latwiejsza :
ListBox1.Items.IndexOf('tu jaki tekst')
to gdzie mam ten kod wstawic i co mam wpisac w "jakis tekst" bo sie nie moge zabardzo polapac ;/
Za malo jeszcze siedze w Delphi i dlatego mam takie problemy.
-----------------------------------------------------------------------------------------
Ja mam powiedzmy 3 wiersze w Listbox : aaa, bbb, ccc
i wstawiam Edit1 i Button.
Chce tak zrobic zeby jak wpisze w okienko Edit1 "aaa" i klikajac na button "szukaj" to zeby mi sie podswietlilo to "aaa" na ListBoxie.
Pomoe kto ?
if ListBox1.Items.IndexOf(Edit1.text) > -1 then ListBox1.ItemIndex:=ListBox1.Items.IndexOf(Edit1.text);
najpierw sprawdzamy czy zwrocona wartosc jest wieksza od -1 (jesli wynosi -1 to znaczy ze nie znaleziono tekstu)
potem ustawiamy ItemIndex (czyli zaznaczenie) na znaleziona linie...
Dzieki. Wszystko dziaa a mam jeszcze pytanko.
Najgorsze jest to ze musze wpisac cale wyrazenie i z takich samych liter zeby mi podswietlilo, powiedzmy : Adam Mickiewicz
Zeby mi podwietlilo musze wpisac calosc z takimi samymi znakami a dalo by rade by wpisac tylko Adam i zeby podswietlilo caly wiersz ? i powiedzmy nie bralo pod uwage wielkosc liter ?
Dzieki. Wszystko dziaa a mam jeszcze pytanko.
Najgorsze jest to ze musze wpisac cale wyrazenie i z takich samych liter zeby mi podswietlilo, powiedzmy : Adam Mickiewicz
Zeby mi podwietlilo musze wpisac calosc z takimi samymi znakami a dalo by rade by wpisac tylko Adam i zeby podswietlilo caly wiersz ? i powiedzmy nie bralo pod uwage wielkosc liter ?
Wszystko ok !!! Dzieki za pomoc. Kod z gowy i wszystko dziaa niele ;)
To juz moje ostatnie pytanko :
Jak narazie znajduje mi pierszy wyraz, powiedzmy mam wiersz "Adam Mickiewicz" wpisze mickiewicz i nie znajdzie, jak wpisze adam to znajdzie.
Co mam zmienic lub doda by znajdowalo mi tez 2 wyraz z tego samego wiersza ?
poczytaj sobie w Faq'u
Wszystko ok !!! Dzieki za pomoc. Kod z gowy i wszystko dziaa niele ;)
To juz moje ostatnie pytanko :
Jak narazie znajduje mi pierszy wyraz, powiedzmy mam wiersz "Adam Mickiewicz" wpisze mickiewicz i nie znajdzie, jak wpisze adam to znajdzie.
Co mam zmienic lub doda by znajdowalo mi tez 2 wyraz z tego samego wiersza ?
Dzieki