home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magazyn Internet 2001 September
/
MICD2001_09_NR1.iso
/
MICD.EXE
/
0
/
RCDATA
/
TPROGRESSFORM
/
TPROGRESSFORM.txt
Wrap
Text File
|
2001-08-13
|
2KB
|
100 lines
object ProgressForm: TProgressForm
Left = 200
Top = 108
BorderIcons = []
BorderStyle = bsSingle
Caption = 'Kopiowanie'
ClientHeight = 135
ClientWidth = 405
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Position = poScreenCenter
Scaled = False
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 405
Height = 93
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
object ZLabel: TLabel
Left = 10
Top = 7
Width = 14
Height = 16
Caption = 'Z:'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object DoLabel: TLabel
Left = 10
Top = 30
Width = 25
Height = 16
Caption = 'Do:'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Z_txt: TLabel
Left = 40
Top = 7
Width = 3
Height = 16
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Do_txt: TLabel
Left = 40
Top = 30
Width = 3
Height = 16
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Gauge: TGauge
Left = 5
Top = 50
Width = 395
Height = 35
ForeColor = clBlue
Progress = 0
end
end
object Panel2: TPanel
Left = 0
Top = 95
Width = 405
Height = 40
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 1
object Anuluj_but: TButton
Left = 165
Top = 8
Width = 75
Height = 25
Caption = 'Anuluj'
ModalResult = 2
TabOrder = 0
OnClick = Anuluj_butClick
end
end
end