Código Delphi [-]Var f2:TextFile; s:String; begin S:='Hola que tal.' Assign(F2, 'C:\Prueba.txt'); Write(F2,S); CloseFile(F2); end; //Para eliminar un fichero puedes utilizar: DeleteFile(NombreFichero);
Var f2:TextFile; s:String; begin S:='Hola que tal.' Assign(F2, 'C:\Prueba.txt'); Write(F2,S); CloseFile(F2); end; //Para eliminar un fichero puedes utilizar: DeleteFile(NombreFichero);