summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/corelib/fpg_widget.pas7
1 files changed, 5 insertions, 2 deletions
diff --git a/src/corelib/fpg_widget.pas b/src/corelib/fpg_widget.pas
index a74c1b30..dc47702e 100644
--- a/src/corelib/fpg_widget.pas
+++ b/src/corelib/fpg_widget.pas
@@ -962,8 +962,11 @@ begin
if not consumed and (keycode = fpgApplication.HelpKey) and (shiftstate=[]) then
begin
- InvokeHelp;
- consumed := True;
+ if fpgApplication.HelpFile <> '' then
+ begin
+ InvokeHelp;
+ consumed := True;
+ end;
end;
case keycode of