home *** CD-ROM | disk | FTP | other *** search
- object Form4: TForm4
- Left = 347
- Top = 204
- BorderIcons = []
- BorderStyle = bsSingle
- Caption = 'Setup Progress'
- ClientHeight = 150
- ClientWidth = 331
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Bevel1: TBevel
- Left = 10
- Top = 95
- Width = 311
- Height = 10
- Shape = bsBottomLine
- end
- object Label1: TLabel
- Left = 95
- Top = 15
- Width = 226
- Height = 19
- Caption = 'Label1'
- end
- object Image1: TImage
- Left = 10
- Top = 16
- Width = 32
- Height = 32
- AutoSize = True
- Picture.Data = {<image000.ico>}
- end
- object Label3: TLabel
- Left = 50
- Top = 15
- Width = 41
- Height = 13
- Caption = 'Copying:'
- end
- object Label2: TLabel
- Left = 95
- Top = 35
- Width = 226
- Height = 13
- AutoSize = False
- Caption = 'Label2'
- end
- object Label4: TLabel
- Left = 50
- Top = 35
- Width = 39
- Height = 13
- Caption = 'Copy to:'
- end
- object Button1: TButton
- Left = 246
- Top = 115
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- TabOrder = 0
- OnClick = Button1Click
- end
- object Panel2: TPanel
- Left = 10
- Top = 65
- Width = 311
- Height = 21
- BevelOuter = bvNone
- BorderStyle = bsSingle
- Caption = 'Panel2'
- TabOrder = 1
- object Bar: TGauge
- Left = 0
- Top = 0
- Width = 307
- Height = 17
- Align = alClient
- Color = clSilver
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- BorderStyle = bsNone
- ForeColor = clNavy
- ParentColor = False
- ParentFont = False
- Progress = 0
- end
- end
- end
-