Busca de String em Um arquivo TXT
Gostaria de Saber como posso implementar uma busca em um arquivo TXT, é mais ou menos como aquele LOCALIZAR do Windows. Eu insiro uma sequência de Strings e o Programa vai varrendo vários arquivos e buscando dentro desses arquivos a sequencia de String. Estou utilizando a função POS, mas acho q não deu certo, pois há strings e ele não acha, algumas são achadas e outras não. Desde já agradeço. Obg Galera !
[b:30df4d2903][color=green:30df4d2903]Bloqueado(Saviski)[/color:30df4d2903][/b:30df4d2903]
[b:30df4d2903][color=green:30df4d2903]Bloqueado(Saviski)[/color:30df4d2903][/b:30df4d2903]
Cabal
Curtidas 0
Respostas
Beppe
07/02/2005
A função Pos é sensitiva ao caso. Seria mais eficiente escrever uma nova Pos que ignore o caso, mas o pessoal prefere converter pra minúsculo o texto e o padrão.
Verifique se eu não inverti os parâmetros aí.
Pos(AnsiLowerCase(Texto), AnsiLowerCase(Padrao)) > 0
Verifique se eu não inverti os parâmetros aí.
GOSTEI 0
Beppe
07/02/2005
Verifiquei agora e vi que eu inverti os argumentos. O correto então fica:
E sobre a MP que me passou, funciona tb com dígitos, qq caractere na verdade.
Pos(AnsiLowerCase(Padrao), AnsiLowerCase(Texto)) > 0
E sobre a MP que me passou, funciona tb com dígitos, qq caractere na verdade.
GOSTEI 0
Gandalf.nho
07/02/2005
[b:1ea2e1045f][color=red:1ea2e1045f]Notificação de Infração às Regras de Conduta :[/color:1ea2e1045f][/b:1ea2e1045f]
Duplicidade
[url]http://forum.clubedelphi.net/viewtopic.php?t=58360[/url]
Para maiores esclarecimentos pode mandar-me uma [url=http://delphiforum.icft.com.br/forum/privmsg.php?mode=post&u=8378]Mensagem Particular[/url].
Duplicidade
[url]http://forum.clubedelphi.net/viewtopic.php?t=58360[/url]
Para maiores esclarecimentos pode mandar-me uma [url=http://delphiforum.icft.com.br/forum/privmsg.php?mode=post&u=8378]Mensagem Particular[/url].
GOSTEI 0