arquivo de texto

Delphi

19/06/2003

essa procedure em baixo cria um arquico em c:/
mas eu nao sei como abrir o arquivo e nem edita-lo
como eu posso fazer.............

=======
procedure TForm1.Button1Click(Sender: TObject);
var Arquivo: TStringList;
begin
Arquivo := TStringList.Create;
try
Arquivo.Add(Edit1.Text);
Arquivo.Add(Edit2.Text);
Arquivo.SaveToFile(´C:\ARQUIVO.TXT´);
finally
Arquivo.Free;
end;
end;
========


Joni

Joni

Curtidas 0

Respostas

Henrique

Henrique

19/06/2003

Para abrir o arquivo:
arquivo.loadfromfile(´c:\arquivo´);

Para ler as linhas
edit1.text := arquivo.strings[numero da linha];


GOSTEI 0
Joni

Joni

19/06/2003

alguem sabe mais comandos?


GOSTEI 0
Joni

Joni

19/06/2003

alguem sabe mais comandos?


GOSTEI 0
POSTAR