Edición de archivos txt

[cardanver]

Hola a todos.
Les comento, realice una aplicación que genera un archivo txt donde guarda todos los campos completados.
Logre que lo genere si no existe o agregue datos si ya existe.
El problema comienza cuando con el inno setup hago el instalador, al ejecutar la aplicación funciona pero no me guarda ni genera el archivo txt.
Que debería modificar, para que al instalarse el aplicativo genere y/o agregue el archivo.
Les adjunto el codigo con el que genero el archivo:

Código Delphi [-]
 

  path: TextFile;
  sArchivo: string;

Begin
   sArchivo := ExtractFilePath( Application.ExeName ) + 'archivo1.txt';
   AssignFile( path, sArchivo );
 if FileExists( sArchivo )
 then
 begin
   Append( path )
 end
 else
 begin
   Rewrite( path );
 end;
 WriteLn( path,MaskEdit1.Text+' ',MaskEdit2.Text+' ',MaskEdit3.Text+' ',MaskEdit4.Text+' ',MaskEdit5.Text+' ',MaskEdit6.Text+' ',MaskEdit7.Text+' ',MaskEdit8.Text+' ',MaskEdit9.Text+' ',MaskEdit10.Text+' '  );
 WriteLn(path,'-------------------------------------------------------------------------0-------------------------------------------------------------------------');
 WriteLn(path,'');
 CloseFile( path );

Desde ya agradezco su ayuda, saludos.