[_TopOfScript]
; This is a Innoscript generated by dBASE PLUS Project Explorer

[_Project]
ProjectNr=1.0.0.0
ProjectName=Numismatic_Cha_Cha
ProjectExeFileName=C:\dbasewin\coins\Numismatic_Cha_Cha.exe
ProjectMainFileName=D:\issfiles\chacha1.iss
ProjectAuthor=Copyright © 2024 Unknown Author
ProjectCreateDate=05/23/2024 14:06:11
ProjectAccessDate=05/23/2024 14:06:11
ProjectdBaseVersion=dBASE PLUS 11.3  b2550
ProjectLastdBaseRuntimeVersion=
ProjectLastdBaseRuntimeLanguage=
ProjectdBasePRJFilename=

[ISPP]
#pragma option -v+
#pragma verboselevel 9 ;Macro and functions successfull call acknowledgements
#define Debug
#define AppName "Numismatic_Cha_Cha"
#define AppVersion "1.0.0.0"
#define AppId "Numismatic_Cha_Cha_ID"
#define AppCopyright "Copyright © 2024 Unknown Author"
#define AppUninstallDir "{app}\Uninstall Information"

[dBASERuntime]
#define SM_dBASERuntime "true"
#define dBPlus "true"
#define dBSeparat "false"
#define Resource "false"
#define dBASELang "EN"
#define dBaseRuntimeInstDir "C:\Program Files (x86)\dBASE\Plus11\Runtime\PLUS1130Runtime-b2550_ALL.exe"
#define dBaseRuntimeInstVer "2550"
#define dBaseRuntimeDir "C:\Program Files (x86)\dBASE\Plus11\Runtime"
#define dBaseBuild "2550"
#define dBaseVersion "1130"
#define BDEGroupEntries "true"
#define dBProgressbar "false"
#define dBProgressbox "false"
#define dBSilent "false"
#define dBUninstall "true"
#define dBDestRuntime ""
#define dBDestBDE ""
#define dBMainFile "Numismatic_Cha_Cha.exe"
#define DBuac "1"
#define dbVista ""
#define UninsHS "true"
#define UninsHSLanguages "DE EN IT ES FR"
#define UninsHSExeDir "C:\Program Files (x86)\dBASE\Plus11\Runtime\Include\Utilities\UnInsHs"
#include "C:\Program Files (x86)\dBASE\Plus11\Runtime\Include\dbaseRuntime.inc"

#define UninsHS "true"
#define UninsHSLanguages "DE EN IT ES FR"
#define UninsHSExeDir "C:\Program Files (x86)\dBASE\Plus11\Runtime\Include\Utilities\UnInsHs"

[LangOptions]
LanguageCodePage=0

[Setup]
SourceDir=C:\dbasewin\coins
SetupIconFile=
AppId={#AppId}
AppName={#AppName}
AppVersion={#AppVersion}
AppVerName={#AppName} Version {#AppVersion}
AppCopyright={#AppCopyright}
DefaultDirName={pf}\{#AppName}
DefaultGroupName={#AppName}
OutputBaseFilename=Numismatic_Cha_Cha_Installer
PrivilegesRequired=admin
ShowLanguageDialog=false
VersionInfoVersion={#AppVersion}
VersionInfoDescription={#AppName} Setup
VersionInfoCompany={#AppCopyright}
VersionInfoTextVersion=Version {#AppVersion}
UninstallFilesDir={#AppUninstallDir}

[Languages]
Name: en; MessagesFile: compiler:Default.isl

[Messages]
BeveledLabel=Copyright © 2024 Unknown Author

[Icons]
#if 'false' == UninsHS
  Name: {group}\{cm:UninstallProgram,{#AppName}}; Filename: {uninstallexe}
#endif

[Files]
; dBASE Runtime Installer
Source: "C:\Program Files (x86)\dBASE\Plus11\Runtime\PLUS1130Runtime-b2550_ALL.exe"; DestDir: "{tmp}"; Flags: ignoreversion deleteafterinstall
;BDE Settings
Source: C:\Program Files (x86)\dBASE\Plus11\Runtime\Include\Utilities\BDE\AddAlias.exe; DestDir: {tmp}; DestName: dBase_AddAlias.exe

Source: C:\Program Files (x86)\dBASE\Plus11\Runtime\PlusR_DE.dll; DestDir: {app}; Flags: IgnoreVersion
Source: C:\Program Files (x86)\dBASE\Plus11\Runtime\PlusR_EN.dll; DestDir: {app}; Flags: IgnoreVersion
Source: C:\Program Files (x86)\dBASE\Plus11\Runtime\PlusR_ES.dll; DestDir: {app}; Flags: IgnoreVersion
Source: C:\Program Files (x86)\dBASE\Plus11\Runtime\PlusR_FR.dll; DestDir: {app}; Flags: IgnoreVersion
Source: C:\Program Files (x86)\dBASE\Plus11\Runtime\PlusR_IT.dll; DestDir: {app}; Flags: IgnoreVersion
Source: clip.tmp; DestDir: {app}; Flags: IgnoreVersion
Source: REPORT.Co; DestDir: {app}; Flags: IgnoreVersion
Source: coindata\category.DBF; DestDir: {app}; Flags: OnlyIfDoesntExist
Source: coindata\category.mdx; DestDir: {app}; Flags: OnlyIfDoesntExist
Source: coindata\COINS.DBF; DestDir: {app}; Flags: OnlyIfDoesntExist
Source: coindata\COINS.mdx; DestDir: {app}; Flags: OnlyIfDoesntExist
Source: coindata\COLLECTION.DBF; DestDir: {app}; Flags: OnlyIfDoesntExist
Source: coindata\COLLECTION.mdx; DestDir: {app}; Flags: OnlyIfDoesntExist
Source: coindata\country.DBF; DestDir: {app}; Flags: OnlyIfDoesntExist
Source: coindata\country.mdx; DestDir: {app}; Flags: OnlyIfDoesntExist
Source: coindata\CSVCONV.DBF; DestDir: {app}; Flags: OnlyIfDoesntExist
Source: coindata\CSVCONV.mdx; DestDir: {app}; Flags: OnlyIfDoesntExist
Source: coindata\csvtemp.DBF; DestDir: {app}; Flags: OnlyIfDoesntExist
Source: coindata\help.DBF; DestDir: {app}; Flags: OnlyIfDoesntExist
Source: coindata\help.dbt; DestDir: {app}; Flags: OnlyIfDoesntExist
Source: coindata\IMAGE.DBF; DestDir: {app}; Flags: OnlyIfDoesntExist
Source: coindata\IMAGE.mdx; DestDir: {app}; Flags: OnlyIfDoesntExist
Source: coindata\MEMO.DBF; DestDir: {app}; Flags: OnlyIfDoesntExist
Source: imagetls\info.jpg; DestDir: {app}; Flags: IgnoreVersion
Source: imagetls\ni.png; DestDir: {app}; Flags: IgnoreVersion
Source: imagetls\NO-IMAGE.JPG; DestDir: {app}; Flags: IgnoreVersion
Source: imagetls\pi.png; DestDir: {app}; Flags: IgnoreVersion

[RUN]
Filename: {tmp}\dBase_AddAlias.exe; Parameters: """-coindata"" ""{userappdata}"" ""DBASE"""; WorkingDir: {tmp}; StatusMsg: Install BDE Alias; Flags: SkipIfDoesntExist
Filename: {tmp}\PLUS1130Runtime-b2550_ALL.exe
 
 
[_EndOfScript]
; © dBase Portions by Jonny Kwekkeboom © 2002-2024
; Visual dBase, dB2K, dBase SE and dBase Plus © dataBased Intelligence.Inc Homepage: http://www.databi.com/
; dQuery for Delphi,C++,dBASE PLUS © dataBased Intelligence.Inc see also Homepage: http://www.dQuery.com/

[Code]
var FinishedInstall: Boolean;

procedure InitializeWizard();
begin
  FinishedInstall:= false
end;

procedure CurPageChanged(CurPageID: Integer);
begin
  dBase_CurPageChanged(CurPageID); {INFO: Added for dBase Runtime start}
  if CurPageID = wpFinished then FinishedInstall:= True;
end;

procedure DeInitializeSetup( );
var ErrorCode: Integer;
begin
  if FinishedInstall then
    #if VER >= 0x05000100
      ShellExec('open',ExpandConstant('{group}'),'',ExpandConstant('{group}'), SW_SHOWNORMAL, ewNoWait, ERRORCODE);
    #else
      InstShellExec(ExpandConstant('{group}'), '', '', SW_SHOWNORMAL, ERRORCODE);
    #endIf
end;

function InitializeSetup(): Boolean;
var S: String;
begin
 (** Create a Mutex so we can not double call this Setup.exe file **)
  S:='{#AppName}';
  Result:= true;
  if CheckForMutexes(S+'_SetupMutex')=false
  then Createmutex(S+'_SetupMutex')
  else Result:=False;
end;

#ifdef dBaseRuntimeInstDir
procedure DeinitializeUninstall();
begin
  dBase_DeinitializeUninstall();  (** INFO: Added for dBase Runtime uninstall **)
end;
#endif