object ProgressDlg: TProgressDlg Left = 251 Top = 172 BorderIcons = [] BorderStyle = bsDialog Caption = 'Backup Utility' ClientHeight = 134 ClientWidth = 427 Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] PixelsPerInch = 96 Position = poScreenCenter TextHeight = 16 object Bevel1: TBevel Left = 8 Top = 8 Width = 409 Height = 81 end object lblSource: TLabel Left = 104 Top = 16 Width = 61 Height = 16 Caption = 'lblSource' Font.Color = clNavy Font.Height = -13 Font.Name = 'System' Font.Style = [] ParentFont = False end object Gauge1: TGauge Left = 16 Top = 56 Width = 393 Height = 25 MaxValue = 1000 Progress = 0 end object lblDestination: TLabel Left = 104 Top = 32 Width = 90 Height = 16 Caption = 'lblDestination' Font.Color = clNavy Font.Height = -13 Font.Name = 'System' Font.Style = [] ParentFont = False end object Label1: TLabel Left = 16 Top = 16 Width = 49 Height = 16 Caption = 'Source:' end object Label2: TLabel Left = 16 Top = 32 Width = 78 Height = 16 Caption = 'Destination:' end object BitBtn1: TBitBtn Left = 169 Top = 96 Width = 89 Height = 33 Cancel = True Caption = '&Cancel' TabOrder = 0 OnClick = BitBtn1Click end end