home *** CD-ROM | disk | FTP | other *** search
- object frmPlacesBar: TfrmPlacesBar
- Left = 307
- Top = 304
- BorderStyle = bsDialog
- Caption = 'Common Dialogs - Places Bar'
- ClientHeight = 300
- ClientWidth = 378
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- OldCreateOrder = False
- Scaled = False
- Position = poMainFormCenter
- OnCreate = FormCreate
- DesignSize = (
- 378
- 300)
- PixelsPerInch = 96
- TextHeight = 13
- object Label4: TLabel
- Left = 12
- Top = 59
- Width = 83
- Height = 13
- HelpContext = 2337
- Caption = '&Places:'
- FocusControl = lvPlacesBar
- end
- object Label1: TLabel
- Left = 12
- Top = 10
- Width = 346
- Height = 41
- AutoSize = False
- Caption =
- 'Specify which places should be shown in the bar here. You can ch' +
- 'ange the order of the buttons by using the Up and Down buttons.'
- WordWrap = True
- end
- object Bevel1: TBevel
- Left = 12
- Top = 254
- Width = 356
- Height = 7
- Anchors = [akLeft, akBottom]
- Shape = bsTopLine
- end
- object btnOK: TButton
- Left = 209
- Top = 265
- Width = 76
- Height = 23
- HelpContext = 5
- Anchors = [akLeft, akBottom]
- Caption = 'OK'
- Default = True
- TabOrder = 7
- OnClick = btnOKClick
- end
- object btnCancel: TButton
- Left = 291
- Top = 265
- Width = 76
- Height = 23
- HelpContext = 3
- Anchors = [akLeft, akBottom]
- Cancel = True
- Caption = 'Cancel'
- TabOrder = 8
- OnClick = btnCancelClick
- end
- object lvPlacesBar: TListView
- Left = 12
- Top = 76
- Width = 262
- Height = 125
- HelpContext = 2337
- Columns = <
- item
- AutoSize = True
- Caption = 'Places'
- end>
- HideSelection = False
- ReadOnly = True
- ShowColumnHeaders = False
- TabOrder = 0
- ViewStyle = vsReport
- OnDblClick = lvPlacesBarDblClick
- OnSelectItem = lvPlacesBarSelectItem
- end
- object btnChangePlace: TButton
- Left = 190
- Top = 208
- Width = 84
- Height = 24
- HelpContext = 2336
- Caption = '&Change...'
- TabOrder = 3
- OnClick = btnChangePlaceClick
- end
- object btnMovePlaceUp: TButton
- Left = 284
- Top = 75
- Width = 83
- Height = 24
- HelpContext = 27
- Caption = '&Up'
- TabOrder = 4
- OnClick = btnMovePlaceUpClick
- end
- object btnMovePlaceDown: TButton
- Left = 284
- Top = 103
- Width = 83
- Height = 24
- HelpContext = 28
- Caption = '&Down'
- TabOrder = 5
- OnClick = btnMovePlaceDownClick
- end
- object btnRemovePlace: TButton
- Left = 101
- Top = 208
- Width = 84
- Height = 24
- HelpContext = 29
- Caption = 'Re&move'
- TabOrder = 2
- OnClick = btnRemovePlaceClick
- end
- object btnAddPlace: TButton
- Left = 12
- Top = 208
- Width = 84
- Height = 24
- HelpContext = 30
- Caption = '&Add...'
- TabOrder = 1
- OnClick = btnAddPlaceClick
- end
- object btnRestoreDefault: TButton
- Left = 12
- Top = 265
- Width = 97
- Height = 24
- HelpContext = 7
- Anchors = [akLeft, akBottom]
- Caption = '&Restore Defaults'
- TabOrder = 6
- OnClick = btnRestoreDefaultClick
- end
- object tmrEnable: TTimer
- Enabled = False
- Interval = 10
- OnTimer = tmrEnableTimer
- Left = 320
- Top = 188
- end
- end
-