[_TopOfScript] ; This is a Innoscript originally generated by dBASE PLUS Project Explorer ; After first generated it has been updated manually by Charles Siegel [_Project] ProjectNr=1.0.0.0 ProjectName=TCOS ProjectExeFileName=C:\dbasewin\TCOS.exe ProjectMainFileName= ProjectAuthor=Copyright © 2018 Charles Siegel ProjectCreateDate=06/01/2017 20:43:33 ProjectAccessDate=06/01/2017 20:43:33 ProjectdBaseVersion=dBASE PLUS 10.3 b2504 ProjectLastdBaseRuntimeVersion=1020 ProjectLastdBaseRuntimeLanguage=EN ProjectdBasePRJFilename=C:\dbasewin\TCOS [ISPP] #pragma option -v+ #pragma verboselevel 9 ;Macro and functions successfull call acknowledgements #define Debug #define AppName "TCOS" #define AppVersion "10.0.0.0" #define AppId "TCOS_ID" #define AppCopyright "Copyright © 2018 Charles Siegel" #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\Plus10\Runtime\PLUS1031Runtime-b2504_ALL.exe" #define dBaseRuntimeInstVer "2504" #define dBaseRuntimeDir "C:\Program Files (x86)\dBASE\Plus10\Runtime" #define dBaseBuild "2488" #define dBaseVersion "1020" #define BDEGroupEntries "false" #define dBProgressbar "false" #define dBProgressbox "false" #define dBSilent "false" #define dBUninstall "true" #define dBDestRuntime "{app}" #define dBDestBDE "{cf}\Borland\bde" #define dBMainFile "TCOS.exe" #define DBuac "0" #define dbVista "" #define UninsHS "true" #define UninsHSLanguages "EN" #define UninsHSExeDir "C:\Program Files (x86)\dBASE\Plus10\Runtime\Include\Utilities\UnInsHs" #define UninsHSExeDir "C:\Program Files (x86)\dBASE\Plus10\Runtime\Include\Utilities\UnInsHs" #include "C:\Program Files (x86)\dBASE\Plus10\Runtime\Include\dbaseRuntime.inc" #define UninsHSExeDir "C:\Program Files (x86)\dBASE\Plus10\Runtime\Include\Utilities\UnInsHs" [LangOptions] LanguageCodePage=0 [Setup] SourceDir=C:\dbasewin SetupIconFile= AppId={#AppId} AppName={#AppName} AppVersion={#AppVersion} AppVerName={#AppName} Version {#AppVersion} AppCopyright={#AppCopyright} DefaultDirName={pf}\{#AppName} DefaultGroupName={#AppName} 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 © 2018 Charles Siegel [Tasks] Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons} Name: desktopicon\user; Description: For the current user only; GroupDescription: {cm:AdditionalIcons}; Flags: Exclusive Unchecked; Languages: en Name: desktopicon\common; Description: For all users; GroupDescription: {cm:AdditionalIcons}; Flags: Exclusive; Languages: en Name: quicklaunchicon; Description: {cm:CreateQuickLaunchIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: Unchecked [Icons] Name: {group}\{#AppName} ; Filename: {app}\TCOS.exe; WorkingDir: {app} Name: {commonstartmenu}\{#AppName} ; Filename: {app}\TCOS.exe; WorkingDir: {app} Name: {userstartmenu}\{#AppName} ; Filename: {app}\TCOS.exe; WorkingDir: {app} Name: {commondesktop}\{#AppName}; Filename: {app}\TCOS.exe; WorkingDir: {app}; IconFilename: {app}\TCOS.exe; Tasks: desktopicon\common Name: {userdesktop}\{#AppName}; Filename: {app}\TCOS.exe; WorkingDir: {app}; IconFilename: {app}\TCOS.exe; Tasks: desktopicon\user Name: {userappdata}\Microsoft\Internet Explorer\Quick Launch\{#AppName}; Filename: {app}\TCOS.exe; WorkingDir: {app}; IconFilename: {app}\TCOS.exe; Tasks: quicklaunchicon #if 'false' == UninsHS Name: {group}\{cm:UninstallProgram,{#AppName}}; Filename: {uninstallexe} #endif [Dirs] Name: "{userappdata}\train" [Files] ; dBASE Runtime Installer Source: "C:\Program Files (x86)\dBASE\Plus10\Runtime\PLUS1031Runtime-b2504_ALL.exe"; DestDir: "{tmp}"; Flags: ignoreversion deleteafterinstall ;BDEl Settings Source: c:\Program Files (x86)\dbase\Plus10\Runtime\Include\Utilities\bde\AddAlias.exe; DestDir: {tmp}; DestName: dbase_AddAlias.exe Source: data\MASTER.DBF; DestDir: {userappdata}\train; Source: data\MASTER.mdx; DestDir: {userappdata}\train; Source: data\AUCTION.DBF; DestDir: {userappdata}\train; Source: data\AUCTION.mdx; DestDir: {userappdata}\train; Source: TCOS.exe; DestDir: {app}; Flags: IgnoreVersion Source: data\AUCTTXT.DBF; DestDir: {userappdata}\train; ;Source: data\SPDFILE.MEM; DestDir: {userappdata}\train; Source: data\talname.dbf; DestDir: {userappdata}\train; Source: data\salesdt.DBF; DestDir: {userappdata}\train; Source: data\NAZDATA.DBF; DestDir: {userappdata}\train; Source: data\NAZDATA.dbt; DestDir: {userappdata}\train; Source: data\CGSOLD.DBF; DestDir: {userappdata}\train; Source: data\pg.dbf; DestDir: {userappdata}\train; Source: data\CONV0.DBF; DestDir: {userappdata}\train; Source: data\conv1.dbf; DestDir: {userappdata}\train; Source: data\conv2.dbf; DestDir: {userappdata}\train; Source: data\spdmem.mem; DestDir: {userappdata}\train; Source: data\location.DBF; DestDir: {userappdata}\train; Source: data\AUCTCLOSED.DBF; DestDir: {userappdata}\train; Source: data\AUCTCLOSED.mdx; DestDir: {userappdata}\train; Source: data\auctint.dbf; DestDir: {userappdata}\train; Source: data\auctint.dbt; DestDir: {userappdata}\train; Source: data\AUCTOLD.DBF; DestDir: {userappdata}\train; Source: data\auctopen.DBF; DestDir: {userappdata}\train; Source: data\auctopen.mdx; DestDir: {userappdata}\train; Source: data\CAT.DBF; DestDir: {userappdata}\train; Source: data\CAT.mdx; DestDir: {userappdata}\train; Source: data\EMAILWIN.DBF; DestDir: {userappdata}\train; Source: data\guide.DBF; DestDir: {userappdata}\train; Source: data\histcgsold.DBF; DestDir: {userappdata}\train; Source: data\histcgsold.mdx; DestDir: {userappdata}\train; Source: data\histinv.DBF; DestDir: {userappdata}\train; Source: data\inv.DBF; DestDir: {userappdata}\train; Source: data\inv.mdx; DestDir: {userappdata}\train; Source: data\LABEL.DBF; DestDir: {userappdata}\train; Source: data\LABEL.mdx; DestDir: {userappdata}\train; Source: data\pnote.DBF; DestDir: {userappdata}\train; Source: data\pnote.dbt; DestDir: {userappdata}\train; Source: data\rawarch.dbf; DestDir: {userappdata}\train; Source: data\rawarch.mdx; DestDir: {userappdata}\train; Source: data\rawdata.dbf; DestDir: {userappdata}\train; Source: data\rawdata.mdx; DestDir: {userappdata}\train; Source: data\rawname.dbf; DestDir: {userappdata}\train; Source: data\rawname.mdx; DestDir: {userappdata}\train; Source: data\salesdttot.dbf; DestDir: {userappdata}\train; Source: data\salesmem.DBF; DestDir: {userappdata}\train; Source: data\spddata.DBF; DestDir: {userappdata}\train; Source: data\spddata.mdx; DestDir: {userappdata}\train; Source: data\spdname.DBF; DestDir: {userappdata}\train; Source: data\spdname.mdx; DestDir: {userappdata}\train; Source: data\spdtrans.dbf; DestDir: {userappdata}\train; Source: data\spdnamearch.dbf; DestDir: {userappdata}\train; Source: data\spdnamearch.mdx; DestDir: {userappdata}\train; Source: data\spddataarch.dbf; DestDir: {userappdata}\train; Source: data\spddataarch.mdx; DestDir: {userappdata}\train; Source: data\taldata.DBF; DestDir: {userappdata}\train; Source: data\taldata.mdx; DestDir: {userappdata}\train; Source: data\talmem.DBF; DestDir: {userappdata}\train; Source: data\convshop.DBF; DestDir: {userappdata}\train; Source: data\convshop.mdx; DestDir: {userappdata}\train; [RUN] Filename: {tmp}\PLUS1031Runtime-b2504_ALL.exe; Parameters: "/S"; Flags:runascurrentuser waituntilterminated runhidden; Description: "dBASE Runtime and BDE"; StatusMsg: "Installing dBASE Runtime and BDE..."; WorkingDir: {tmp}; Filename: {tmp}\dBase_AddAlias.exe; Parameters: """-train"" ""{userappdata}\train"" ""DBASE"""; WorkingDir: {tmp}; StatusMsg: Install BDE Alias ;Filename: {tmp}\PLUS1031Runtime-b2504_ALL.exe; Parameters: "-s -a Runtime=""{pf}\dBASE\Runtime"" BDE=""{cf}\Borland\BDE"" Silent -sr"; StatusMsg: Installing dBASE Runtime and BDE... Filename: {app}\tcos.exe; Description: Now start TCOS; Flags: nowait postinstall skipifsilent [_EndOfScript] ; © dBase Portions by Jonny Kwekkeboom © 2002-2017 ; 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