object ToolbarConfig: TToolbarConfig Left = 365 Top = 132 BorderStyle = bsDialog Caption = 'Toolbar Properties' ClientHeight = 352 ClientWidth = 449 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] PixelsPerInch = 96 Position = poScreenCenter OnShow = FormShow TextHeight = 13 object Label1: TLabel Left = 8 Top = 16 Width = 100 Height = 13 Caption = 'Currently On Toolbar:' end object Label2: TLabel Left = 232 Top = 16 Width = 102 Height = 13 Caption = 'Not Visible, Available:' end object ListBox1: TListBox Left = 8 Top = 32 Width = 209 Height = 233 DragMode = dmAutomatic ItemHeight = 30 Style = lbOwnerDrawVariable TabOrder = 0 OnDragDrop = ListBoxDragDrop OnDragOver = ListBoxDragOver OnDrawItem = ListBoxDrawItem OnMeasureItem = ListBoxMeasureItem end object ListBox2: TListBox Left = 232 Top = 32 Width = 209 Height = 233 DragMode = dmAutomatic ItemHeight = 30 Style = lbOwnerDrawVariable TabOrder = 1 OnDragDrop = ListBoxDragDrop OnDragOver = ListBoxDragOver OnDrawItem = ListBoxDrawItem OnMeasureItem = ListBoxMeasureItem end object DefaultBtn: TBitBtn Left = 288 Top = 280 Width = 153 Height = 26 Caption = '&Reset Defaults' TabOrder = 2 OnClick = DefaultBtnClick end object AlignmentChoice: TRadioGroup Left = 8 Top = 280 Width = 169 Height = 65 Caption = 'Toolbar &Position:' Columns = 2 ItemIndex = 0 Items.Strings = ( 'Top' 'Bottom' 'Left' 'Right') TabOrder = 3 end object OKBtn: TBitBtn Left = 208 Top = 320 Width = 73 Height = 26 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 4 OnClick = OKBtnClick NumGlyphs = 2 end object CancelBtn: TBitBtn Left = 288 Top = 320 Width = 73 Height = 26 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 5 NumGlyphs = 2 end object ApplyBtn: TBitBtn Left = 368 Top = 320 Width = 73 Height = 26 Caption = '&Apply' TabOrder = 6 OnClick = ApplyBtnClick end end