Fórum arquivo de texto #165624
19/06/2003
0
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
Curtir tópico
+ 0Posts
19/06/2003
Henrique
arquivo.loadfromfile(´c:\arquivo´);
Para ler as linhas
edit1.text := arquivo.strings[numero da linha];
Gostei + 0
19/06/2003
Joni
Gostei + 0
19/06/2003
Joni
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)