ASIS: Advanced Simple Installer Script

[Cesar82]

Originally Posted by L33THAK0R

Ah alright, sorry was just hoping that'd it'd be possible to put the needed resources inside of the ASIS generated .exe, as was possible with v7.2.0.0, guess I won't be using v7.2.2.0+ lol

If version 7.2.0.0 is working well for you, great ...
Older versions may contain a bug that may have been fixed in the newer version.

If you want you can include the Setup.dll file internally from Setup.exe just by adding 4 lines to the script (red lines below). But you must first create Setup.dll and include it with scritp.iss before compiling Setup.exe. To do this, change it in the script:
In the [Files] section add.

[Files]
....
///////////////////////////////////////////////////////////////////////////////////////////
//////////////// FreeArc/ISDone Files /////////////////////////////////////////////////////
///////////////////////////////////////////////////////////////////////////////////////////
Source: "{#SetupSetting("OutputBaseFilename")}.dll"; DestDir: "COMPRESSORS"; Flags: dontcopy nocompression

Source: "Resources\Includes\UnArc.dll"; DestDir: "COMPRESSORS"; Flags: dontcopy
Source: "Resources\Includes\ISDone.dll"; DestDir: "COMPRESSORS"; Flags: dontcopy

In the [Code] section, locate for "procedure UltraARC_Process;" and add the line:

procedure UltraARC_Process;
var
  Data: Array of TData;
  I, MsgResult: Integer;
  SourceDir, DataFile: String;
  #if UseComponents == "1"
  ComponentFile: String;
  #endif
  SysInfo: TSystemInfo;
  Threads: Integer;
begin
  ExtractTemporaryFile('{#SetupSetting("OutputBaseFilename")}.dll');
  if CompareText('{#SetupSetting("OutputBaseFilename")}.dll', ExtractFileName(ChangeFileExt(ExpandConstant('{srcexe}'), '.dll'))) <> 0 then
    FileCopy(ExpandConstant('{tmp}\{#SetupSetting("OutputBaseFilename")}.dll'), ExpandConstant('{tmp}\') + ExtractFileName(ChangeFileExt(ExpandConstant('{srcexe}'), '.dll')), False);

  //BEGIN - DISK SPAN GUI CHANGES
  I := 1;
  ISDoneError := False;
  ExtractTemporaryFile('UnArc.dll');