Abrir um arquivo de texto e ir para a primeira linha
Dae galera, seguinte..
Preciso abrir um file .txt e ir para a primeira linha deste, onde preciso inserir uma linha em branco.. Okayz.. tntei o seguinte
Embora tenha inserido a linha, foi no final do file.. :-(
Alguem ae tem alguma dica?
Preciso abrir um file .txt e ir para a primeira linha deste, onde preciso inserir uma linha em branco.. Okayz.. tntei o seguinte
var tTexto : TextFile; begin AssignFile(tTexto,edt_texto.txt); Reset(tTexto); Append(tTexto); end;
Embora tenha inserido a linha, foi no final do file.. :-(
Alguem ae tem alguma dica?
Skaarj
Curtidas 0
Respostas
Jc_analista
24/03/2004
Depois que vc da o Reset ele aponta pra primeira linha
var
tTexto : TextFile;
begin
AssignFile(tTexto,edt_texto.txt);
Reset(tTexto);
Writeln(tTexto,´ ´);
Append(tTexto);
end;
var
tTexto : TextFile;
begin
AssignFile(tTexto,edt_texto.txt);
Reset(tTexto);
Writeln(tTexto,´ ´);
Append(tTexto);
end;
GOSTEI 0
Skaarj
24/03/2004
Blz cara.. Thnkz..
GOSTEI 0