home *** CD-ROM | disk | FTP | other *** search
- object OptionDlg: TOptionDlg
- Left = 710
- Top = 657
- HelpContext = 1018
- ActiveControl = DirectoryList
- BorderStyle = bsDialog
- Caption = 'Archive Directories'
- ClientHeight = 219
- ClientWidth = 501
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- PixelsPerInch = 96
- Position = poScreenCenter
- OnCreate = FormCreate
- TextHeight = 13
- object Label1: TLabel
- Left = 8
- Top = 9
- Width = 45
- Height = 13
- Caption = '&Directory:'
- FocusControl = DirectoryList
- end
- object Label2: TLabel
- Left = 8
- Top = 173
- Width = 33
- Height = 13
- Caption = 'Dri&ves:'
- FocusControl = Drives
- end
- object Label3: TLabel
- Left = 232
- Top = 9
- Width = 90
- Height = 13
- Caption = 'A&rchive directories:'
- FocusControl = ArchiveDirs
- end
- object DirectoryList: TDirectoryListBox
- Left = 8
- Top = 25
- Width = 137
- Height = 141
- HelpContext = 1018
- ItemHeight = 16
- TabOrder = 5
- end
- object Drives: TDriveComboBox
- Left = 8
- Top = 189
- Width = 141
- Height = 19
- HelpContext = 1018
- TabOrder = 6
- OnChange = DrivesChange
- end
- object ArchiveDirs: TListBox
- Left = 232
- Top = 25
- Width = 260
- Height = 141
- Hint = 'Search path for archives'
- HelpContext = 1018
- ItemHeight = 13
- ParentShowHint = False
- ShowHint = False
- TabOrder = 7
- end
- object BitBtn1: TBitBtn
- Left = 249
- Top = 185
- Width = 75
- Height = 25
- Hint = 'Accept changes to list of archive directories'
- HelpContext = 1018
- Caption = 'OK'
- Default = True
- ModalResult = 1
- ParentShowHint = False
- ShowHint = False
- TabOrder = 2
- NumGlyphs = 2
- end
- object BitBtn2: TBitBtn
- Left = 334
- Top = 185
- Width = 75
- Height = 25
- Hint = 'Dismiss dialog without changing archive directories'
- HelpContext = 1018
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- ParentShowHint = False
- ShowHint = False
- TabOrder = 3
- NumGlyphs = 2
- end
- object HelpButton: TBitBtn
- Left = 419
- Top = 185
- Width = 75
- Height = 25
- Hint = 'Get more detailed help'
- HelpContext = 1018
- Caption = '&Help'
- ParentShowHint = False
- ShowHint = False
- TabOrder = 4
- OnClick = HelpButtonClick
- NumGlyphs = 2
- end
- object BitBtn3: TBitBtn
- Left = 151
- Top = 47
- Width = 75
- Height = 25
- Hint = 'Add directory to list of archive directories'
- HelpContext = 1018
- Caption = '&Add >'
- ParentShowHint = False
- ShowHint = False
- TabOrder = 0
- OnClick = AddButtonClick
- NumGlyphs = 2
- end
- object RemoveButton: TBitBtn
- Left = 151
- Top = 83
- Width = 75
- Height = 25
- Hint = 'Remove directory from list of achive directories'
- HelpContext = 1018
- Caption = '< Re&move'
- ParentShowHint = False
- ShowHint = False
- TabOrder = 1
- OnClick = RemoveButtonClick
- NumGlyphs = 2
- end
- object CreateDirectory: TBitBtn
- Left = 151
- Top = 119
- Width = 75
- Height = 25
- Hint = 'Create a new archive directory'
- Caption = 'Cr&eate'
- ParentShowHint = False
- ShowHint = False
- TabOrder = 8
- OnClick = CreateDirectoryClick
- NumGlyphs = 2
- end
- end
-