diff --git a/lcl/include/customform.inc b/lcl/include/customform.inc
index 6d37d8aba4..af1b31b1bc 100644
--- a/lcl/include/customform.inc
+++ b/lcl/include/customform.inc
@@ -1466,6 +1466,7 @@ end;
 procedure TCustomForm.ShowOnTop;
 begin
   Show;
+  if WindowState=wsMinimized then WindowState:=wsNormal;
   BringToFront;
   //DebugLn('TCustomForm.ShowOnTop ',Name,':',ClassName,' ',Visible,' ',HandleAllocated,' ',csDesigning in ComponentState);
 end;