TAdvToolBar - how to vertically centre controls

object Form17: TForm17
Left = 0
Top = 0
Caption = 'Form17'
ClientHeight = 1128
ClientWidth = 1150
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object AdvDockPanel1: TAdvDockPanel
Left = 0
Top = 0
Width = 1150
Height = 45
MinimumSize = 3
LockHeight = False
Persistence.Location = plRegistry
Persistence.Enabled = False
UseRunTimeHeight = False
Version = '6.8.0.0'
object AdvToolBar1: TAdvToolBar
Left = 3
Top = 1
Width = 174
Height = 30
UIStyle = tsOffice2019White
AllowFloating = True
Caption = 'Untitled'
CaptionFont.Charset = DEFAULT_CHARSET
CaptionFont.Color = clWindowText
CaptionFont.Height = -11
CaptionFont.Name = 'Tahoma'
CaptionFont.Style = []
CompactImageIndex = -1
TextAutoOptionMenu = 'Add or Remove Buttons'
TextOptionMenu = 'Options'
ParentOptionPicture = True
ToolBarIndex = -1
DesignSize = (
174
30)
object AdvToolBarButton2: TAdvToolBarButton
Left = 9
Top = 2
Width = 15
Height = 26
Appearance.CaptionFont.Charset = DEFAULT_CHARSET
Appearance.CaptionFont.Color = clWindowText
Appearance.CaptionFont.Height = -12
Appearance.CaptionFont.Name = 'Segoe UI'
Appearance.CaptionFont.Style = []
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
Position = daTop
Version = '6.8.0.0'
end
object AdvToolBarButton3: TAdvToolBarButton
Left = 145
Top = 2
Width = 15
Height = 26
Appearance.CaptionFont.Charset = DEFAULT_CHARSET
Appearance.CaptionFont.Color = clWindowText
Appearance.CaptionFont.Height = -12
Appearance.CaptionFont.Name = 'Segoe UI'
Appearance.CaptionFont.Style = []
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
Position = daTop
Version = '6.8.0.0'
end
object AdvOfficeComboBox1: TAdvOfficeComboBox
AlignWithMargins = True
Left = 24
Top = 2
Width = 121
Height = 19
Margins.Top = 7
Button.Color = clWhite
Button.ColorTo = clWhite
Button.ColorHot = 15917525
Button.ColorHotTo = 15917525
Button.ColorDown = 14925219
Button.ColorDownTo = 14925219
Button.Width = 12
BorderColor = 10724259
BorderHotColor = 14925219
SelectionColor = 15914434
SelectionColorTo = 15914434
SelectionTextColor = 3881787
Version = '1.6.1.0'
Anchors = []
ItemIndex = -1
ItemHeight = 14
TabOrder = 0
end
end
end
end