diff --git a/Lib/UIRibbon.pas b/Lib/UIRibbon.pas
index 101f103..c040a64 100644
--- a/Lib/UIRibbon.pas
+++ b/Lib/UIRibbon.pas
@@ -1358,6 +1358,8 @@ function TUIRibbon.OnCreateUICommand(CommandId: UInt32; TypeId: _UICommandType;
 end;
 
 function TUIRibbon.OnDestroyUICommand(CommandId: UInt32; TypeId: _UICommandType; const CommandHandler: IUICommandHandler): HRESULT;
+var
+  lCommand: TUICommand;
 begin
   //FCommands.Remove(CommandId);   <- Code commented, because we might still have references to the command at this point. Since it is not ref-counted, we must not destroy it yet.
   if Assigned(FOnCommandDestroy) and TryGetCommand(CommandId, lCommand) then