diff options
Diffstat (limited to 'installer/opentrack-installer.iss')
-rw-r--r-- | installer/opentrack-installer.iss | 90 |
1 files changed, 0 insertions, 90 deletions
diff --git a/installer/opentrack-installer.iss b/installer/opentrack-installer.iss index d87cafd7..e8a20b6c 100644 --- a/installer/opentrack-installer.iss +++ b/installer/opentrack-installer.iss @@ -8,8 +8,6 @@ #define MyAppURL "http://github.com/opentrack/opentrack" #define MyAppExeName "opentrack.exe" -#include "non-ui-blocking-exec.iss" - [Setup] ; NOTE: The value of AppId uniquely identifies this application. ; Do not use the same AppId value in installers for other applications. @@ -52,94 +50,6 @@ Name: "{group}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}" Name: "{commondesktop}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}"; Tasks: desktopicon [Run] -Filename: "timeout.exe"; Parameters: "/t 0"; Flags: runhidden; StatusMsg: Installing RealSense Runtime. This may take several minutes.; Check: RSCameraDriverDetectedAndEulaAccepted Filename: "{app}\{#MyAppExeName}"; Flags: nowait postinstall skipifsilent; Description: "{cm:LaunchProgram,{#StringChange(MyAppName, '&', '&&')}}"; [Code] -var - EulaAccepted:Boolean; - RSCameraDriverDetected:Boolean; - EULAPage: TOutputMsgMemoWizardPage; - EULAAcceptRadioButton: TNewRadioButton; - EULARefuseRadioButton: TNewRadioButton; - -function IsRSCameraDriverPresent():Boolean; -var - Version:String; -begin - result := RegQueryStringValue(HKEY_LOCAL_MACHINE, 'Software\Intel\RSSDK\Components\ivcam', - 'Version', Version) or RegQueryStringValue(HKEY_LOCAL_MACHINE, 'Software\Wow6432Node\Intel\RSDCM\SR300', - 'Version', Version) -end; - -procedure EULAAcceptRefuseButtonStateUpdated(Sender: TObject); -begin - EulaAccepted := EULAAcceptRadioButton.Checked -end; - - -function RSCameraDriverDetectedAndEulaAccepted():Boolean; -begin -result := RSCameraDriverDetected and EulaAccepted; -end; - -procedure DoPostInstall(); -var - Version: String; - ExecInfo: TShellExecuteInfo; -begin -if RSCameraDriverDetectedAndEulaAccepted then - begin - NonUiBlockingExec(ExpandConstant('{app}\doc\contrib\intel_rs_sdk_runtime_websetup_10.0.26.0396.exe'), - '--silent --no-progress --acceptlicense=yes --front --finstall=core,face3d --fnone=all'); - end -end; - -procedure CurStepChanged(CurStep: TSetupStep); - begin - if CurStep = ssPostInstall then - begin - DoPostInstall() - end -end; - -procedure InitializeWizard(); -var - EULAText: AnsiString; -begin - -EulaAccepted := false -RSCameraDriverDetected := IsRSCameraDriverPresent() - -if RSCameraDriverDetected then - begin - ExtractTemporaryFile('RS_EULA.rtf'); - if LoadStringFromFile(ExpandConstant('{tmp}\RS_EULA.rtf'), EULAText) then - begin - EULAPage := CreateOutputMsgMemoPage(wpLicense, - 'Information', 'Intel RealSense End-User License agreement', - 'Opentrack may use the Intel RealSense SDK Runtime on your compatible system. To get it installed, please accept its EULA:', - EULAText); - EULAPage.RichEditViewer.Height := ScaleY(148); - EULAAcceptRadioButton := TNewRadioButton.Create(EULAPage); - EULAAcceptRadioButton.Left := EULAPage.RichEditViewer.Left; - EULAAcceptRadioButton.Top := EULAPage.Surface.ClientHeight - ScaleY(41); - EULAAcceptRadioButton.Width := EULAPage.RichEditViewer.Width; - EULAAcceptRadioButton.Parent := EULAPage.Surface; - EULAAcceptRadioButton.Caption := SetupMessage(msgLicenseAccepted); - EULARefuseRadioButton := TNewRadioButton.Create(EULAPage); - EULARefuseRadioButton.Left := EULAPage.RichEditViewer.Left; - EULARefuseRadioButton.Top := EULAPage.Surface.ClientHeight - ScaleY(21); - EULARefuseRadioButton.Width := EULAPage.RichEditViewer.Width; - EULARefuseRadioButton.Parent := EULAPage.Surface; - EULARefuseRadioButton.Caption := SetupMessage(msgLicenseNotAccepted); - - // Set the states and event handlers - EULAAcceptRadioButton.OnClick := @EULAAcceptRefuseButtonStateUpdated; - EULARefuseRadioButton.OnClick := @EULAAcceptRefuseButtonStateUpdated; - EULARefuseRadioButton.Checked := true; - EulaAccepted := EULAAcceptRadioButton.Checked - //TODO: if camera is detected, activate RS EULA page and RSSDK install, save if it was accepted or not. - end - end -end; |