📏Fixe left side icons size on smaller than 769 height screen size.

vhanla · Sep 7, 2023 · af36f35 · af36f35
1 parent b4034dd
commit af36f35
Showing 1 changed file with 4 additions and 1 deletion.
diff --git a/menu.pas b/menu.pas
@@ -256,7 +256,10 @@ procedure TfrmMenu.ShowMenuAnimation(aLocation: Integer; aShow: Boolean = True);
         for I := 0 to Icons.Count - 1 do
         begin
           if Settings.BarPosition = ABE_LEFT then
-            Icons[I].Left := 54 - Self.Width + 4
+            if Screen.Height <= 768 then
+              Icons[I].Left := 42 - Self.Width + 2
+            else
+              Icons[I].Left := 54 - Self.Width + 4
           else
             Icons[I].Left := 4;
         end;