Código Delphi [-] var f:textfile; assingfile (f,'c:\archivo.txt)
var f:textfile; assingfile (f,'c:\archivo.txt)