como perquisar uma string dentro de um ListBox

Question

E ai galera beleza ?Gostaria de saber como pesquisar uma string dentro de um ListBox , entao selecionar a linha que sta essa string Tipo : Listbox.itemIndex := �a linha que esta a string�se tiver algu...

Michael · Answer

Ol�!A classe [b:5d8e98fe56]TStrings[/b:5d8e98fe56], respons�vel pelo armazenamento dos dados em diversos componentes da VCL (ComboBox, ListBox, Memo, etc), prov� o m�todo [b:5d8e98fe56]IndexOf[/b:5d8e98fe56], que retorna o �ndice da string informada dentro da lista de dados, ou -1 se nada for encontrado.[code:1:5d8e98fe56] ListBox1.ItemIndex := ListBox1.Items.IndexOf(�Minha string�)[/code:1:5d8e98fe56][]�s...

Bruno Belchior · Answer

aten��o que esse c�digo do Michael s� retornar� a string se no ListBox estiver obrigat�riamente igual a string passa no IndexOf... caso ela seja uma substring da mesma ela n�o a encontrar�, consequentemente retornando -1...

Michael · Answer

Correto Bruno. Esqueci de mencionar isso....

Fabiano G�es · Answer

Michael obrigado pela aten��o ,n�o � querendo ser chato n�o mais n�o est� funcionando,olha quando o form e aberto  o lisxtbox recebe um arquivo texto, e o foco vai para a primeira linha (listbox.ItemIndex := 0)ai quando tento fazer apesquisa:[code:1:9f8963a22a]      ListBox1.ItemIndex  :=  ListBox1.Items.IndexOf(edit1.text);[/code:1:9f8963a22a]�obs: estou pesquisando uma string que estou vendo ela no lisxtbox�ent�o o listboxbox.itemindex fica igual a -1mais eu sei que a string existe porque estou vendo ela no listbox....

Steve_narancic · Answer

tente o seguinte[code:1:8b1a5a6b7e] ListBox1.ItemIndex := Listobox1.Perform(LB_SELECTSTRING, 0, LongInt(PChar(edit1.text)));[/code:1:8b1a5a6b7e]...

Fabiano G�es · Answer

Bruno ent�o acho que � isso que est� acontecendo,pois na verdade estou pesquisando uma subString( desculpe michael )tem como solucionar isso ???...

Fabiano G�es · Answer

Pessoal valeu ai pela dica,Valeu Michael , Bruno, steve_narancic.Est� funcionando beleza, mais tem um porem :e sem tiver mais de uma string(pesquisada) iguam ???? :?: tem como fazer um pesquisa daquele ponto pra frente ??Tipo (F3) Procure Novamente ;...

Steve_narancic · Answer

grava o itemindex em uma variavel e quando pressionar o F3, faz a procura novamente e se o itemindex for menor que o valor da variavel manda fazer a procura novamente....

Fabiano G�es · Answer

steve_narancic , desculpe eu estar sendo chato, mais estou tentando e n�o estou conseguindo.ser� que voc� poderia me passar um c�digo de exemplo ?Por favor ........

Michael · Answer

Ol� colega!Vc pode criar uma fun��o para isso ent�o. Veja:[code:1:94841f8db0]function IndexOfEx(StringList : TStringList; const Text : string; StartIndex : integer = -1) : Integer;var  I : Integer;begin  Result := -1;  for I := StartIndex + 1 to StringList.Count - 1 do    if Pos(Text, StringList&#91;I&93;) > 0 then    begin      Result := I;      break;    end;end;[/code:1:94841f8db0]Criei esta fun��o agora, portanto, n�o sei se vai funcionar. Mas teoricamente deve ocorrer tudo bem.Se vc cham�-la com apenas dois par�metros, ela vai pesquisar desde o in�cio da lista. Para simular um F3, vc deve informar no 3� par�metro a posi��o atual da lista.[]�s...

Fabiano G�es · Answer

Valeu Michael sua fun��o est� funcionando perfeitamente e me resolveu um grande problema.um grande abra�o !!!!...

F�rum como perquisar uma string dentro de um ListBox #297716