wie moze ktos jak zrobic wyszukiwanie w ListView? ale nie chodzi o subitem a o caption (tak zeby wynajdywac wyrazy z pierwszej kolumny, czyli caption)
dzieki :)
pisze z glowy:
for i:=0 to pred(ListView1.Items.count) do
if Items[i].Caption=SzukanyString then
Znalazlem(i);
--Pawel
Delphi6
dzieki {browar}
hm... co zrobic zeby przechodzic do znalezionego wiersza w ListView jezeli
if ViewService.Items[i].Caption= Edit1.Text then
................
?
Zobacz sobie tez to:
begin
ListView.Selected := ListView.Items[-1];
for I := 0 to ListView.Items.Count -1 do
begin
if (Pos(LowerCase(SearchText.Text), LowerCase(ListView.Items[i].Caption)) > 0) or
(Pos(LowerCase(SearchText.Text), LowerCase(ListView.Items[i].SubItems.CommaText)) > 0) then
begin
ListView.SetFocus;
ListView.Selected := ListView.Items[i];
ListView.Scroll(0, (ListView.Items[i].Top) - 100);
end;
end;
end;--Pozdrawiam {hello}
Tomasz K.
Heh wstawilo mi gembe zamiest znakow ';' i '(' . Ten kod przewinie tekst.--Pozdrawiam {hello}
Tomasz K.