Escribir la letra ñ en un fichero

[delphi.com.ar]

Te comento que TU codigo escribe y lee lo mismo del archivo:

Código Delphi [-]
procedure TForm1.btnSaveClick(Sender: TObject);
var
  F: TextFile;
begin
  AssignFile(F, 'C:\PRUEBA.TXT');
  ReWrite(F);
  WriteLn(F, Edit1.Text);
  CloseFile(F);
end;

procedure TForm1.btnLoadClick(Sender: TObject);
var
  F: TextFile;
  S: string;
begin
  AssignFile(F, 'C:\PRUEBA.TXT');
  Reset(F);
  Readln(F, S);
  Edit2.Text := S;
  CloseFile(F);
end;

¿Necesitas leer el archivo con un programa externo?

[delphi.com.ar]

Me olvidé un detalle, si quieres guardarlo como texto OEM, te recomiendo utilizar la función CharToOem para convertir el texto.

Saludos!

[magm2000]

Hola Federico:
El texto que escribo no lo voy a leer desde Delphi, sino con otros programas externos.
Un saludo.

[delphi.com.ar]

Ok.. si son programas desarrollados en Windows, casi seguro que los van a leer sin problemas, sinó tienes que usar CharToOem, pero ahí no vas a poder verlo correctamente desde aplicaciones como el Block de Notas.

Saludos!