object DriveSelectListDlg: TDriveSelectListDlg Left = 398 Top = 275 BorderStyle = bsDialog Caption = 'Select Drives for recording DIRs && FILEs' ClientHeight = 255 ClientWidth = 345 Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter PixelsPerInch = 96 TextHeight = 13 object SrcLabel: TLabel Left = 8 Top = 8 Width = 145 Height = 16 AutoSize = False Caption = 'Available Drive List:' end object DstLabel: TLabel Left = 192 Top = 8 Width = 145 Height = 16 AutoSize = False Caption = 'Selected Drive List:' end object IncludeBtn: TSpeedButton Left = 160 Top = 32 Width = 24 Height = 24 Caption = '>' OnClick = IncludeBtnClick end object IncAllBtn: TSpeedButton Left = 160 Top = 64 Width = 24 Height = 24 Caption = '>>' OnClick = IncAllBtnClick end object ExcludeBtn: TSpeedButton Left = 160 Top = 96 Width = 24 Height = 24 Caption = '<' Enabled = False OnClick = ExcludeBtnClick end object ExAllBtn: TSpeedButton Left = 160 Top = 128 Width = 24 Height = 24 Caption = '<<' Enabled = False OnClick = ExcAllBtnClick end object OKBtn: TButton Left = 101 Top = 220 Width = 75 Height = 25 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 2 end object CancelBtn: TButton Left = 181 Top = 220 Width = 75 Height = 25 Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 3 end object SrcList: TListBox Left = 8 Top = 24 Width = 144 Height = 185 Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ItemHeight = 16 MultiSelect = True ParentFont = False Sorted = True TabOrder = 0 end object DstList: TListBox Left = 192 Top = 24 Width = 144 Height = 185 Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ItemHeight = 16 MultiSelect = True ParentFont = False Sorted = True TabOrder = 1 end end