Acceso a exe en ejecución

[ElDuc]

Hola colegas.

Necesito acceder a un archivo.exe que se está ejecutando:

Código Delphi [-]
 
Procedure ..........
Var Fi:File;
begin
AssignFile(Fi,Exe.Text);
{$I-}
Reset(Fi,1);
{$I+}
If IOResult<>0 Then
  Begin Beep;ShowMessage('Error de acceso al archivo');Exit;End;
CloseFile(Fi);
end;

Donde Exe es un TEdit y su propiedad Text contiene el nombre del archivo que quiero manipular.

El sistema me da un error (32) y no me deja acceder.

Alguien puede ayudarme?.

Gracias.