diff --git a/lcl/interfaces/qt/qtwidgets.pas b/lcl/interfaces/qt/qtwidgets.pas
index 4a6f002fd4..b34d6643d5 100644
--- a/lcl/interfaces/qt/qtwidgets.pas
+++ b/lcl/interfaces/qt/qtwidgets.pas
@@ -8356,8 +8356,12 @@ begin
   else {currently applies only to oxygen & nitrogen theme.}
   if ((TopMargin - BottomMargin - 2) > FontHeight) then
   begin
-    TopMargin := TopMargin - BottomMargin - 3;
-    BottomMargin := 0;
+    {do not touch fusion style !}
+    if QtWidgetSet.StyleName <> 'fusion' then
+    begin
+      TopMargin := TopMargin - BottomMargin - 3;
+      BottomMargin := 0;
+    end;
   end;
   {$ENDIF}
   {if there's no text set margin to bottom margin size. issue #23642}