diff --git a/ide/main.pp b/ide/main.pp
index 7c17d0d3bb..9c15a1250c 100644
--- a/ide/main.pp
+++ b/ide/main.pp
@@ -11091,7 +11091,8 @@ procedure TMainIDE.DoBringToFrontFormOrInspector(ForceInspector: boolean);
   begin
     if ObjectInspector1=nil then exit;
     ObjectInspector1.ShowOnTop;
-    FDisplayState:= Succ(FDisplayState);
+    if FDisplayState <> high(TDisplayState) then
+      FDisplayState:= Succ(FDisplayState);
   end;
 
 begin