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.