object dlgVolSetCopy: TdlgVolSetCopy Left = 319 Top = 234 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Copy and Consolidate Volume Set' ClientHeight = 358 ClientWidth = 496 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poScreenCenter OnActivate = FormActivate OnDestroy = FormDestroy PixelsPerInch = 96 TextHeight = 13 object imgDrive: TImage Left = 392 Top = 4 Width = 16 Height = 16 AutoSize = True Picture.Data = {} Transparent = True Visible = False end object lblPhysicalDrives: TIntlLabel Left = 12 Top = 40 Width = 195 Height = 13 Caption = '&Disk:' FocusControl = cbxDrives end object lblDestInfo: TIntlLabel Left = 12 Top = 8 Width = 157 Height = 13 Caption = 'Select an unallocated space for the copy destination.' end object lblVolSetCopyNote: TIntlLabel Left = 12 Top = 256 Width = 472 Height = 41 AutoSize = False Caption = 'This operation will consolidate all volume segments in the volum' + 'e set and copy the data to a new partition. The new partition c' + 'an be accessed from the '#39'Disks'#39' view. It will not be visible in' + ' the '#39'Volume Sets'#39' view.' WordWrap = True end object imgDriveRemote: TImage Left = 413 Top = 4 Width = 16 Height = 16 AutoSize = True Picture.Data = {} Transparent = True Visible = False end object btnOK: TButton Left = 121 Top = 320 Width = 75 Height = 25 Caption = '&OK' Default = True TabOrder = 4 OnClick = btnOKClick end object btnCancel: TButton Left = 211 Top = 320 Width = 75 Height = 25 Cancel = True Caption = '&Cancel' TabOrder = 5 OnClick = btnCancelClick end object btnHelp: TButton Left = 300 Top = 320 Width = 75 Height = 25 Caption = '&Help' TabOrder = 6 OnClick = btnHelpClick end object cbxDrives: TComboBox Left = 12 Top = 56 Width = 146 Height = 21 Style = csOwnerDrawFixed Font.Charset = ANSI_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 15 ParentFont = False TabOrder = 0 OnChange = cbxDrivesChange OnDrawItem = cbxDrivesDrawItem Items.Strings = ( 'Drive 1' 'Drive 2') end object pnlPartList: TPanel Left = 12 Top = 173 Width = 472 Height = 69 BevelOuter = bvNone BorderStyle = bsSingle TabOrder = 3 object lbxPartList: TColumnList Left = 0 Top = 17 Width = 468 Height = 48 TabStop = True Col1Position = 0 Col2Position = 200 Col2Align = claRight Col3Position = 248 Align = alClient BorderStyle = bsNone ItemHeight = 16 Items.Strings = ( 'Unallocated space|20,987.5') ParentColor = False Style = lbOwnerDrawFixed TabOrder = 0 OnClick = lbxPartListClick OnEnter = lbxPartListEnter OnExit = lbxPartListExit end object hdrPartList: THeaderControl Left = 0 Top = 0 Width = 468 Height = 17 DragReorder = False Enabled = False Sections = < item ImageIndex = -1 Text = 'Type' Width = 200 end item ImageIndex = -1 Text = 'Size MB' Width = 10000 end> end end object DestDiskMapPanel: TDiskMapPanel Left = 12 Top = 101 Width = 472 Height = 66 Cyl1024Hint = '1024 cylinder boundary' Cyl1024Visible = False Boot64KHint = '2 GB boot boundary' Boot64KVisible = False Color = clBtnFace BevelOuter = bvNone BorderWidth = 8 TabOrder = 2 end object gbxPosition: TGroupBox Left = 196 Top = 39 Width = 287 Height = 53 Caption = 'Position' TabOrder = 1 object rbtnBegin: TRadioButton Left = 8 Top = 16 Width = 185 Height = 17 Caption = '&Beginning of unallocated space' Checked = True TabOrder = 0 TabStop = True end object rbtnEnd: TRadioButton Left = 8 Top = 32 Width = 185 Height = 17 Caption = '&End of unallocated space' TabOrder = 1 end end end