Mini Ninjas (DVD9 to 1xDVD5)

[peterf1999]

This simple code (setup.exe) launch MINI NINJAS original installer (NSIS) & unpack freearc archive at end of installation

function InitializeSetup(): Boolean;

var
ResultCode: integer; path: string;

begin

  if not RegKeyExists(HKEY_LOCAL_MACHINE, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Mini Ninjas') then
  begin
  Exec (ExpandConstant('{src}\Install.exe'),'', '', SW_SHOW,
     ewWaitUntilTerminated, ResultCode)
  if RegQueryStringValue(HKEY_LOCAL_MACHINE, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Mini Ninjas',
     'UninstallString', path) then
  begin
  path:=RemoveBackslash(ExtractFilePath(path));  
  Exec (ExpandConstant('{src}\MN_arc.exe'), '-x -d'+'"'+path+'"'+' -y -s2', '', SW_SHOW,
      ewNoWait, ResultCode)
  end
  end else
  begin
  Exec (ExpandConstant('{src}\Install.exe'),'', '', SW_SHOW,
     ewNoWait, ResultCode)
  end;

end;

[bo_3li_h]

Originally Posted by peterf1999

This simple code (setup.exe) launch MINI NINJAS original installer (NSIS) & unpack freearc archive at end of installation

function InitializeSetup(): Boolean;

var
ResultCode: integer; path: string;

begin

  if not RegKeyExists(HKEY_LOCAL_MACHINE, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Mini Ninjas') then
  begin
  Exec (ExpandConstant('{src}\Install.exe'),'', '', SW_SHOW,
     ewWaitUntilTerminated, ResultCode)
  if RegQueryStringValue(HKEY_LOCAL_MACHINE, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Mini Ninjas',
     'UninstallString', path) then
  begin
  path:=RemoveBackslash(ExtractFilePath(path));  
  Exec (ExpandConstant('{src}\MN_arc.exe'), '-x -d'+'"'+path+'"'+' -y -s2', '', SW_SHOW,
      ewNoWait, ResultCode)
  end
  end else
  begin
  Exec (ExpandConstant('{src}\Install.exe'),'', '', SW_SHOW,
     ewNoWait, ResultCode)
  end;

end;

Can please tell me how to compile this code? and please let me know where to find some little guide to learn how to use it in the feature for my own conversions, i will appreciate it

and thanks for the conversion, tested under vista 32 it works perfect