Imprimir texto en archivo *.txt

[santiago14]

Empezado por movorack

Hola,

Puedes utilizar un TStringList para ir guardando los textos que requieres (Edits, Memos, Grids, ...) y al final solo le dices donde guardarlo.

ej:

Código Delphi [-]
procedure GuardarEnArchivo;
  var
    StringList : TStringList;
begin
  StringList := TSTringList.Create;
  try
    StringList.Add(Edit1.Text);
    StringList.Add(Memo.Text);
    StringList.Add('Abc...');
    StringList.SaveToFile('C:\MiArchivodetexto.txt');
  finally
    StringList.Free;
  end;
end;

Me parece que esta opción es buena. Si querés guardar el archivo como .csv cambiamos StringList.SaveToFile('C:\MiArchivodetexto.txt'); por StringList.SaveToFile('C:\MiArchivodetexto.csv');