EvaPig

[ISPP]

#define Project "EvaPig2020"

#define Publisher "INRAE - Ajinomoto Animal Nutrition Europe - AFZ"

#define URL "http://www.evapig.com"

; Version

#define Major

#define Minor

#define Release

#define Build

#expr ParseVersion(SourcePath + '\..\' + Project + '.exe',Major,Minor,Release,Build)

[Setup]

; Compiller

PrivilegesRequired=none

OutputBaseFilename={#Project}Setup_{#Major}.{#Minor}.{#Release}.{#Build}

OutputDir=.

VersionInfoCompany={#Publisher}

VersionInfoDescription={#Project} Setup

VersionInfoVersion={#Major}.{#Minor}.{#Release}.{#Build}

; Installer

AppMutex={#Project}

AppName={#Project}

AppVerName={cm:NameAndVersion,{#Project},{#Major}.{#Minor}.{#Release}.{#Build}}

AppVersion={#Major}.{#Minor}.{#Release}.{#Build}

AppPublisher={#Publisher}

AppPublisherURL={#URL}

DefaultDirName={code:DefDirRoot}\{#Project}

DefaultGroupName={#Project}

AllowNoIcons=yes

[Types]

[Components]

[Tasks]

Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}

Name: quicklaunchicon; Description: {cm:CreateQuickLaunchIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked

[Dirs]

[Files]

Source: ..\{#Project}.exe; DestDir: {app}; Flags: ignoreversion

;Source: C:\WINDOWS\SYSTEM32\midas.dll; DestDir: {app}; Flags: ignoreversion

Source: ..\sqlite3.dll; DestDir: {app}; Flags: ignoreversion

Source: ..\{#Project}.dat; DestDir: {app}; Flags: promptifolder

Source: ..\help\{#Project}.chm; DestDir: {app}; Flags: promptifolder

Source: ..\Tutorial.pps; DestDir: {app}; Flags: promptifolder

[Icons]

Name: {group}\{#Project}; Filename: {app}\{#Project}.exe

Name: {group}\{cm:Database}; Filename: {userdocs}\{#Project}

Name: {group}\{cm:Tutorial}; Filename: {app}\Tutorial.pps

Name: {group}\{cm:ProgramOnTheWeb,{#Project}}; Filename: {app}\{#Project}.url

Name: {group}\{cm:UninstallProgram,{#Project}}; Filename: {uninstallexe}

Name: {userdesktop}\{#Project}; Filename: {app}\{#Project}.exe; Tasks: desktopicon

Name: {userappdata}\Microsoft\Internet Explorer\Quick Launch\{#Project}; Filename: {app}\{#Project}.exe; Tasks: quicklaunchicon

[INI]

Filename: {app}\{#Project}.url; Section: InternetShortcut; Key: URL; String: {#URL}

[InstallDelete]

;Type: files; Name: {userappdata}\{#Project}\User.sqb

[Languages]

Name: en; MessagesFile: compiler:Default.isl

Name: fr; MessagesFile: compiler:Languages\French.isl

[Messages]

[CustomMessages]

en.Database=Database

fr.Database=Base de donn?es

en.Tutorial=Tutorial

fr.Tutorial=Didacticiel

en.Run=Run the tutorial now

fr.Run=Lancer le didacticiel maintenant

[LangOptions]

[Registry]

[Run]

;Filename: {app}\{#Project}.exe; Description: {cm:LaunchProgram,{#Project}}; Flags: nowait postinstall skipifsilent

Filename: {app}\Tutorial.pps; Description: {cm:Run}; Flags: postinstall skipifsilent shellexec

[UninstallDelete]

Type: files; Name: {app}\{#Project}.url

[Code]

function IsRegularUser(): Boolean;

begin

  Result := not (IsAdminLoggedOn or IsPowerUserLoggedOn);

end;

function DefDirRoot(Param: String): String;

begin

  if IsRegularUser then

    Result := ExpandConstant('{localappdata}')

  else

    Result := ExpandConstant('{pf}')

end;