Guardar el valor de un EDIT en un fichero de texto

[creus]

Hola a todos,

Necesito guardar el valor de un EDIT en un archivo de texto.

De la misma manera que si quisieramos guardar el valor de un LISTBOX pondríamos el siguiente código,

Código Delphi [-]
   LISTBOX.Items.SaveToFile ('NombreArchivo'+'.extension');

Necesito guardar el valor de un Edit, pero no tiene la propiedad SaveToFile.

Gracias por la ayuda de nuevo.

[dec]

Hola,

Código Delphi [-]
var
  t: TStrings;
begin
  t := TStringList.Create;
  try
    t.Text = Edit1.Text;
    t.SaveToFile('C:\edit1.txt');
  finally
    t.Free;
  end;
end;

[roman]

Otra forma:

Código Delphi [-]
var
  Archivo: TextFile;

begin
  AssignFile(Archivo, 'archivo.txt');
  Rewrite(Archivo);
  WriteLn(Archivo, Edit1.Text);
  CloseFile(Archivo);
end;

// Saludos