retirando string de em aruqivo texto

Delphi

21/03/2005

Ola pessoal, gostaria de saber se alguem pode me ajudar com esta.
preciso retirar parte de um texto que esta em um arquivo Bloco de Notas.
Sera que alguem poderia me ajudar com esta????

Obrigado!!!!! :D


Tux_bh

Tux_bh

Curtidas 0

Respostas

Marcio.theis

Marcio.theis

21/03/2005

Se você esta falando de um arquivo do tipo .txt você pode fazer da seguinte forma:

AssignFile(txt, caminho);
{$I-}
Reset(txt);
{$I+}
if IOResult = 0 then
    begin
    Readln(txt, str);
    Showmessage(str);
    end;

CloseFile(txt);

txt -> Variável do tipo TextFile;
caminho -> Variável do tipo String com o caminho do arquivo txt;
str -> Variável do tipo String que irá receber o conteúdo do arquivo;

E se quiser copiar uma pedaço da linha basta usar o comando copy em cima da variável str.


GOSTEI 0
POSTAR