Fix for Issue #104:

If the ribbon settings file is currently in use, and blocked for read access, an EFOpenError is raised that was previosly not caught.
JAM-Software · Sep 6, 2018 · ffa2db9 · ffa2db9
1 parent 5f49a72
commit ffa2db9
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/Lib/UIRibbon.pas b/Lib/UIRibbon.pas
@@ -1124,6 +1124,8 @@ function TUIRibbon.LoadRibbonSettings(): boolean;
   except
     on E: EOleError do
       {$IFDEF DEBUG}raise;{$else}Exit(False);{$endif}
+    on E: EFOpenError do
+      {$IFDEF DEBUG}raise;{$else}Exit(False);{$endif}
   end;
   Exit(True);
 end;