Excluir duplicadas de um arquivo txt
Bm dia alguem sabe como faço para ler um arquivo txt e excluir as duplicatas de linha?
por exemplo tenho um arquivo assim:
192
192
192
193
precisava pegar somente 192 e 193 para gravar num buffer e mandar para a impressão
por exemplo tenho um arquivo assim:
192
192
192
193
precisava pegar somente 192 e 193 para gravar num buffer e mandar para a impressão
Brunosilvino
Curtidas 0
Respostas
Marco Salles
25/06/2012
Vc pode utilizar a classe Abstrata Tstrings , instancia-la TstringList e utilizar os métodos de leitura
de pesquisa e de eliminação de Items . depois salva-la ou Imprimir o txt modificado
Faça
var
Arquivo:Tstrings;
begin
Arquivo:=TstringList.create;
try
Arquivo.loadFromfile(CaminhodoArquivoTxt);
//Manipule com os métodos
//etc..
finally
Arquivo.free;
end;
end;
os métodos desta classe são muito isntuitivos. mas tai a dica
[]sds
de pesquisa e de eliminação de Items . depois salva-la ou Imprimir o txt modificado
Faça
var
Arquivo:Tstrings;
begin
Arquivo:=TstringList.create;
try
Arquivo.loadFromfile(CaminhodoArquivoTxt);
//Manipule com os métodos
//etc..
finally
Arquivo.free;
end;
end;
os métodos desta classe são muito isntuitivos. mas tai a dica
[]sds
GOSTEI 0