diff --git a/dist/install/windows/x64/lan.iss b/dist/install/windows/x64/lan.iss index 6fe76b89..3b4833b4 100644 --- a/dist/install/windows/x64/lan.iss +++ b/dist/install/windows/x64/lan.iss @@ -55,16 +55,19 @@ Name: "{autodesktop}\{#MyAppName}"; Filename: "{app}\launcher\ayanova-launcher.e Filename: "{app}\launcher\ayanova-launcher.exe"; Description: "{cm:LaunchProgram,{#StringChange(MyAppName, '&', '&&')}}"; Flags: nowait postinstall skipifsilent [Code] -procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep); +procedure CurStepChanged(CurStep: TSetupStep); +var + ErrCode: integer; begin - if CurUninstallStep = usPostUninstall then - begin - if MsgBox('Do you want to delete all AyaNova database and attachment files?', mbConfirmation, MB_YESNO or MB_DEFBUTTON2) = IDYES then + if (CurStep=ssInstall) then begin - if MsgBox('Are you sure you want to **PERMANENTLY** delete all AyaNova database and attachment files?', mbConfirmation, MB_YESNO or MB_DEFBUTTON2) = IDYES then - begin - DelTree(ExpandConstant('{commonappdata}\ayanova'), True, True, True); - end; + if MsgBox('AyaNova depends on the "ASP.NET Core Runtime Hosting bundle" 6.0.0 or newer.\nOpen the download web page now?', mbConfirmation, MB_YESNO or MB_DEFBUTTON2) = IDYES then + begin + ShellExec('open', 'https://dotnet.microsoft.com/download', '', '', SW_SHOW, ewNoWait, ErrCode); + end; + if MsgBox('AyaNova requires a PostgreSQL db server.\nOpen the PostgreSQL installation instructions web page now?', mbConfirmation, MB_YESNO or MB_DEFBUTTON2) = IDYES then + begin + ShellExec('open', 'https://www.postgresqltutorial.com/install-postgresql/', '', '', SW_SHOW, ewNoWait, ErrCode); + end; end; - end; end; diff --git a/docs/8.0/ayanova/docs/ops-install-windows-lan.md b/docs/8.0/ayanova/docs/ops-install-windows-lan.md index f57c0943..071a7107 100644 --- a/docs/8.0/ayanova/docs/ops-install-windows-lan.md +++ b/docs/8.0/ayanova/docs/ops-install-windows-lan.md @@ -2,4 +2,11 @@ - + if MsgBox('AyaNova requires ASP.NET Core Runtime "Hosting bundle" 6.0.0 or newer.\nOpen the download web page now?', mbConfirmation, MB_YESNO or MB_DEFBUTTON2) = IDYES then + begin + ShellExec('open', 'https://dotnet.microsoft.com/download', '', '', SW_SHOW, ewNoWait, ErrCode); + end; + if MsgBox('AyaNova requires PostgreSQL db server.\nOpen the PostgreSQL installation instructions web page now?', mbConfirmation, MB_YESNO or MB_DEFBUTTON2) = IDYES then + begin + ShellExec('open', 'https://www.postgresqltutorial.com/install-postgresql/', '', '', SW_SHOW, ewNoWait, ErrCode); + end;