Ver Mensaje Individual
  #1  
Antiguo 05-12-2014
diegoferxmr diegoferxmr is offline
Registrado
NULL
 
Registrado: dic 2014
Posts: 3
Reputación: 0
diegoferxmr Va por buen camino
Evitar que mi app se instale en un equipo con mi app instalada (InnoSetup)

Hola a todos.

Me gustaria por favor que me ayudaran con ésta situación:
Quiero que el instalador de mi aplicación se cancele si se está ejecutando en un equipo que tiene ya mi aplicación instalada.
Yo busco un archivo clave que siempre se instala con mi app, y con éste código no me funciona:

Código Delphi [-]

begin
Log( 'InitializeSetup' );
// Default.
//
Result := true;

if FileExists('{app}\carpeta1\mi_archivo.xla') then
begin
MsgBox('Mi aplicación ya está instalada, la instalación se cancelará', mbCriticalError, MB_OK);
Result := False;
Exit;
end

En otro foro muestran éste código, pero no se como acoplarlo:

Código Delphi [-]
function FileDoesNotExist(file: string): Boolean;
begin
if (FileExists(file)) then
begin
Result := False;
end
else
begin
Result := True;
end;
end;

Agradezco mucho su ayuda!

Última edición por dec fecha: 05-12-2014 a las 17:20:28.
Responder Con Cita