FIX: Hide menus icons size option under Qt

This commit is contained in:
Alexander Koblov 2026-05-09 00:02:36 +03:00
commit ecf3b8196a
2 changed files with 7 additions and 0 deletions

View file

@ -149,6 +149,10 @@ var
AIconSize: String;
begin
inherited Init;
// Qt bindings support only 16px icons for menu items
{$IF DEFINED(LCLQT5) OR DEFINED(LCLQT6)}
cbIconsInMenusSize.Visible:= False;
{$ENDIF}
for I:= Low(ICON_SIZES) to High(ICON_SIZES) do
begin
AIconSize:= IntToStr(ICON_SIZES[I]) + 'x' + IntToStr(ICON_SIZES[I]);

View file

@ -3273,7 +3273,10 @@ begin
end;
gCustomIcons := TCustomIconsMode(GetValue(Node, 'CustomIcons', Integer(gCustomIcons)));
gIconsInMenus := GetAttr(Node, 'ShowInMenus/Enabled', gIconsInMenus);
// Qt bindings support only 16px icons for menu items
{$IF NOT (DEFINED(LCLQT5) OR DEFINED(LCLQT6))}
gIconsInMenusSize := GetValue(Node, 'ShowInMenus/Size', gIconsInMenusSize);
{$ENDIF}
if gIconsInMenus then
Application.ShowMenuGlyphs:= sbgAlways
else