Muchas gracias
D&W use tu código y funciona a la perfección.
Contestando a
egostar creo que me explique mal no creo el .txt más bien lo edito con:
Código Delphi
[-]
AssignFile(archivo,'ruta del archivo.txt');
Append(archivo);
.....
Muchas gracias a todos por las respuestas, pense que seria más facil pero me doy cuenta de que me quedan muchas intrucciones por aprender!!!