diff --git a/menu.pas b/menu.pas
index 09ea9d3..d699c6b 100644
--- 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;