iluxa77

По умолчанию картинка доступна только для элементов списка типа TMetropolistUIListBoxItem. Стиль для обычного элемента TListBoxItem для Windows не поддерживает картинки в стиле. Однако, чтобы добавить картинку, нужно просто добавить в стиль итема объект TImage с названием StyleName = 'icon'.

Сохраните ваш стиль, откройте блокнотом найдите нужный вам итем стиля, добавьте отступы например:
 
SourceLink = <         item           CapInsets.Left = 8.000000000000000000           CapInsets.Top = 8.000000000000000000           CapInsets.Right = 8.000000000000000000           CapInsets.Bottom = 8.000000000000000000           SourceRect.Left = 208.000000000000000000           SourceRect.Top = 249.000000000000000000           SourceRect.Right = 248.000000000000000000           SourceRect.Bottom = 293.000000000000000000         end   после чего у вас дизайнере появиться дополнительная область выделения, по ней и настраивайте область для растягивания