Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   ayuda con inno setup (https://www.clubdelphi.com/foros/showthread.php?t=78530)

elardk 26-04-2012 23:01:11

ayuda con inno setup
 
Hola amigo; espero alguien me pueda ayudar, estoy generando un instalador con inno setup pero quiero que busque y compruebe que el archivo xxx existe en C y si existe deja instalar y por defecto pone en la ruta de instalacion la misma ruta donde se encuentra el archivo xxx y si no existe dicho archivo arroja un mensaje y no deja instalar.

Saludos amigos y espero alguien me pueda ayudar.

gatosoft 27-04-2012 01:46:19

Hola elardk, no he manejado nunca esa herramienta, pero tengo entendido que dentro de las opciones de instalación "Installation Actions" hay tres opciones: Check, Before Install y after Install, las cuales aceptan Scripts en PASCAL, para hacer tus validaciones y determinar si abortas uno o mas pasos...

La siguiente es una muestra del manual sobre "pascal Scripting"
Código Delphi [-]
[.Code]
var
  MyProgChecked: Boolean;
  MyProgCheckResult: Boolean;

function MyProgCheck(): Boolean;
begin
  if not MyProgChecked then begin
    MyProgCheckResult := MsgBox('Do you want to install MyProg.exe to ' + ExtractFilePath(CurrentFileName) + '?', mbConfirmation, MB_YESNO) = idYes;
    MyProgChecked := True;
  end;
  Result := MyProgCheckResult;
end;

function MyDirCheck(DirName: String): Boolean;
begin
  Result := DirExists(DirName);
end;


Espero que te sirva...


La franja horaria es GMT +2. Ahora son las 05:08:03.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi