Guardar Edit.Text en un Txt

[Greco]

Hola, aquí estoy nuevamente con una duda bastante basica y talvez muy tonta , como puedo guardar el contenido de un Edit en un archivo de texto?? he buscado en el foro y hasta el momento solo he encontrado la forma de guardar el contenido de un Memo pero no de un Edit.

Disculpenme si es una pregunta muy tonta pero preguntando se aprende, ademas que todavia no domino Delphi y me meto en ello cada vez que puedo.

Saludos

[[basti]]

El TEdit no tiene ningún procedimiento para guardar el texto en un archivo. Tienes que hacerlo "a mano":

Código Delphi [-]
var
  f : TextFile;
begin
  AssignFile(f, 'nombre de archivo');
  Rewrite(f);
  write(f, edit1.text);
  CloseFile(f);
end;

[marcoszorrilla]

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
F1:TextFile;
begin
AssignFile(F1, 'C:\Temp\Prueba.Txt');
Rewrite(f1);
Writeln(f1,Edit1.Text);
CloseFile(f1);
end;

Un Saludo.

[Greco]

Muchas gracias a los dos por la ayuda.