fcustomizebuttons.dfm

siMail, siMail, siMail, siMail

object frmToolbarEdit: TfrmToolbarEdit
  Left = 455
  Top = 282
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Customize Toolbar'
  ClientHeight = 257
  ClientWidth = 526
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDefault
  OnActivate = FormActivate
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object btnInsert: TSpeedButton
    Left = 195
    Top = 70
    Width = 66
    Height = 23
    Hint = 'Add button to toolbar'
    BiDiMode = bdLeftToRight
    Caption = 'Insert -&>'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Layout = blGlyphRight
    Margin = 8
    ParentFont = False
    ParentBiDiMode = False
    OnClick = btnInsertClick
  end
  object btnRemove: TSpeedButton
    Left = 195
    Top = 106
    Width = 66
    Height = 23
    Hint = 'Remove button from toolbar'
    Caption = '&<- Remove'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Margin = 5
    ParentFont = False
    OnClick = btnRemoveClick
  end
  object lblAvailableList: TLabel
    Left = 8
    Top = 8
    Width = 124
    Height = 13
    Caption = 'Available toolbar buttons:'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object lblSelectedList: TLabel
    Left = 272
    Top = 8
    Width = 118
    Height = 13
    Caption = 'Current toolbar buttons:'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object Label1: TLabel
    Left = 164
    Top = 32
    Width = 3
    Height = 13
  end
  object Label2: TLabel
    Left = 6
    Top = 209
    Width = 64
    Height = 13
    Caption = 'Text options:'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object Label3: TLabel
    Left = 6
    Top = 237
    Width = 63
    Height = 13
    Caption = 'Icon options:'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    Transparent = True
  end
  object lstAvailable: TListView
    Left = 5
    Top = 28
    Width = 178
    Height = 165
    AllocBy = 30
    Columns = <
      item
        AutoSize = True
      end>
    DragMode = dmAutomatic
    IconOptions.Arrangement = iaLeft
    IconOptions.WrapText = False
    ReadOnly = True
    RowSelect = True
    ShowColumnHeaders = False
    SmallImages = imgButtons
    TabOrder = 0
    ViewStyle = vsReport
    OnChange = lstSelectedChange
    OnDblClick = lstAvailableDblClick
    OnEnter = lstSelectedEnter
    OnExit = lstSelectedExit
    OnDragDrop = lstSelectedDragDrop
    OnDragOver = lstSelectedDragOver
    OnMouseDown = lstSelectedMouseDown
  end
  object btnOK: TButton
    Left = 458
    Top = 12
    Width = 66
    Height = 23
    Caption = 'OK'
    Default = True
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = btnOKClick
  end
  object btnCancel: TButton
    Left = 458
    Top = 40
    Width = 66
    Height = 23
    Cancel = True
    Caption = '&Cancel'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    OnClick = btnCancelClick
  end
  object lstSelected: TListView
    Left = 270
    Top = 28
    Width = 178
    Height = 165
    AllocBy = 30
    Columns = <
      item
        AutoSize = True
      end>
    DragMode = dmAutomatic
    IconOptions.Arrangement = iaLeft
    IconOptions.WrapText = False
    ReadOnly = True
    RowSelect = True
    ShowColumnHeaders = False
    SmallImages = imgButtons
    TabOrder = 1
    ViewStyle = vsReport
    OnChange = lstSelectedChange
    OnDblClick = lstSelectedDblClick
    OnEnter = lstSelectedEnter
    OnExit = lstSelectedExit
    OnDragDrop = lstSelectedDragDrop
    OnDragOver = lstSelectedDragOver
    OnMouseDown = lstSelectedMouseDown
  end
  object btnRestore: TButton
    Left = 458
    Top = 151
    Width = 66
    Height = 23
    Caption = '&Reset'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    OnClick = btnRestoreClick
  end
  object btnApply: TButton
    Left = 458
    Top = 123
    Width = 66
    Height = 23
    Caption = '&Apply'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    OnClick = btnApplyClick
  end
  object ComboBox1: TComboBox
    Left = 109
    Top = 206
    Width = 185
    Height = 21
    Style = csDropDownList
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    ItemHeight = 13
    ItemIndex = 0
    ParentFont = False
    TabOrder = 6
    Text = 'Show text labels'
    OnChange = ComboBox1Change
    Items.Strings = (
      'Show text labels'
      'Selective text on right'
      'No text labels')
  end
  object ComboBox2: TComboBox
    Left = 109
    Top = 234
    Width = 185
    Height = 21
    Style = csDropDownList
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = []
    ItemHeight = 13
    ParentFont = False
    TabOrder = 7
    OnChange = ComboBox2Change
    Items.Strings = (
      'Large icons'
      'Normal icons'
      'Small icons')
  end
  object imgButtons: TImageList
    AllocBy = 30
    Left = 126
    Top = 44
  end
end