Ver Mensaje Individual
  #4  
Antiguo 19-04-2012
alquimista alquimista is offline
Miembro
 
Registrado: ene 2008
Posts: 203
Reputación: 17
alquimista Va por buen camino
Smile

Gracias por la ayuda...
Ya he creado el script desde delphi y ejecutado el compilador sin problemas.

Código Delphi [-]
 try
    Script := TStringList.Create;
    Script.LoadFromFile(strdirapp+'test.iss');
    INx:=Script.IndexOf('[Files]');
  ....
Localizo la sección [Files] e inserto a partir del Indice Inx los archivos a añadir en el script

Luego he utilizado una función de Delphi al limite EjecutarYEsperar
Código Delphi [-]
  
 tmpstr:= directorioaplicacion+'compil32 /cc "script.iss"';
 if EjecutarYEsperar(tmpstr,SW_SHOWNORMAL)=0 then
       //Mensaje de OK
         else
         //mensaje fallo
//Abro la carpeta donde se ha generado el instalador
ShellExecute(Handle,'explore',Pchar(directorioaplicacion+'inst'),'','',SW_SHOWNORMAL);

Si alguien necesita ayuda que lo diga
Responder Con Cita