diff options
| -rw-r--r-- | src/corelib/fpg_base.pas | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/corelib/fpg_base.pas b/src/corelib/fpg_base.pas index 5d8b66f5..0da8cce8 100644 --- a/src/corelib/fpg_base.pas +++ b/src/corelib/fpg_base.pas @@ -2543,6 +2543,8 @@ var p: TProcess; begin Result := False; + if not fpgFileExists(GetHelpViewer) then + raise EfpGUIUserFeedbackException.Create(rsfailedtofindhelpviewer); p := TProcess.Create(nil); try if fpgFileExists(HelpFile) then @@ -2567,6 +2569,8 @@ var p: TProcess; begin Result := False; + if not fpgFileExists(GetHelpViewer) then + raise EfpGUIUserFeedbackException.Create(rsfailedtofindhelpviewer); p := TProcess.Create(nil); try if fpgFileExists(HelpFile) then |