Si quieres reemplazar un
archivo de texto por otro te aconsejo usar la API:
Código Delphi
[-]
CopyFile('C:\Archivos de programa\Delphi7SE\Bin\propio.tmp', 'd:\eula.txt', False);
No es necesario que tengan la misma extensión, pero depende mucho de lo que quieras hacer; si el último parametro es verdadero Y el archivo existe retorna error y no copia, si el parámetro es falso Y el archivo existe lo sobreescribe.
Si quieres crear un archivo nuevo te aconsejo buscar en el foro
AssignFile,
Reset y
WriteLn