home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 2000 April
/
PCWorld_2000-04_cd.bin
/
Software
/
TemaCD
/
leechftp
/
Setup.exe
/
0
/
RCDATA
/
TINSTALLFORM
/
TINSTALLFORM.txt
Wrap
Text File
|
1998-12-03
|
6KB
|
252 lines
object InstallForm: TInstallForm
Left = 224
Top = 108
ActiveControl = NextButton
BorderStyle = bsDialog
Caption = ' Installation'
ClientHeight = 249
ClientWidth = 313
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Position = poScreenCenter
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Bevel1: TBevel
Left = 8
Top = 205
Width = 297
Height = 9
Shape = bsTopLine
end
object Notebook1: TNotebook
Left = 0
Top = 0
Width = 305
Height = 201
TabOrder = 0
OnPageChanged = Notebook1PageChanged
object TPage
Left = 0
Top = 0
Caption = 'a'
object RichEdit1: TRichEdit
Left = 8
Top = 8
Width = 289
Height = 185
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 0
end
end
object TPage
Left = 0
Top = 0
Caption = 'b'
object SpeedButton1: TSpeedButton
Left = 240
Top = 72
Width = 21
Height = 21
Caption = '...'
OnClick = SpeedButton1Click
end
object Label1: TLabel
Left = 16
Top = 56
Width = 98
Height = 13
Caption = 'Install into this folder:'
end
object NetGradient1: TNetGradient
Left = 16
Top = 16
Width = 257
Height = 25
BeginColor = clGray
EndColor = clBtnFace
NumberOfColors = 48
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Caption = 'Destination'
TextTop = 5
TextLeft = 12
end
object DestEdit: TEdit
Left = 16
Top = 72
Width = 217
Height = 21
TabOrder = 0
OnChange = DestEditChange
end
object IconCheckBox: TCheckBox
Left = 16
Top = 104
Width = 217
Height = 17
Caption = 'Create Icon in Start Menu'
State = cbChecked
TabOrder = 1
end
end
object TPage
Left = 0
Top = 0
Caption = 'c'
object MyGauge1: TMyGauge
Left = 16
Top = 64
Width = 273
Height = 20
Vertical = False
ShowText = True
Min = 0
Max = 100
Position = 0
Color = clBlue
end
object Label2: TLabel
Left = 16
Top = 48
Width = 56
Height = 13
Caption = 'Current File:'
end
object Label5: TLabel
Left = 16
Top = 140
Width = 33
Height = 13
Caption = 'Status:'
end
object StatusLabel: TLabel
Left = 54
Top = 140
Width = 21
Height = 13
Caption = 'n/a'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 16
Top = 96
Width = 71
Height = 13
Caption = 'Total Progress:'
end
object MyGauge2: TMyGauge
Left = 16
Top = 112
Width = 273
Height = 20
Vertical = False
ShowText = True
Min = 0
Max = 100
Position = 0
Color = clBlue
end
object NetGradient2: TNetGradient
Left = 16
Top = 16
Width = 273
Height = 25
BeginColor = clGray
EndColor = clBtnFace
NumberOfColors = 48
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Caption = 'Extracting Files'
TextTop = 5
TextLeft = 12
end
end
end
object BackButton: TButton
Left = 144
Top = 216
Width = 75
Height = 25
Caption = '<< Previous'
Enabled = False
TabOrder = 1
OnClick = BackButtonClick
end
object NextButton: TButton
Left = 232
Top = 216
Width = 75
Height = 25
Caption = 'Next >>'
Default = True
TabOrder = 2
OnClick = NextButtonClick
end
object Button1: TButton
Left = 8
Top = 216
Width = 75
Height = 25
Cancel = True
Caption = 'Cancel'
TabOrder = 3
OnClick = Button1Click
end
object RAR1: TRAR
OnProcessData = RAR1ProcessData
OnError = RAR1Error
OnListFile = RAR1ListFile
OnExtracting = RAR1Extracting
OnExtract = RAR1Extract
Left = 16
Top = 136
end
object MarsCaption1: TMarsCaption
ActiveBeginColor = clBlue
ActiveEndColor = clBlack
ActiveFontColor = clWhite
InactiveBeginColor = clGray
InactiveEndColor = clSilver
InactiveFontColor = clSilver
ApplicationNameFont.Charset = DEFAULT_CHARSET
ApplicationNameFont.Color = clWindowText
ApplicationNameFont.Height = -11
ApplicationNameFont.Name = 'MS Sans Serif'
ApplicationNameFont.Style = [fsBold]
CaptionFont.Charset = DEFAULT_CHARSET
CaptionFont.Color = clBlack
CaptionFont.Height = -11
CaptionFont.Name = 'MS Sans Serif'
CaptionFont.Style = []
NumColors = 64
AutoSize = False
ImageIndex = 0
AutoDisable = False
EnableCustomButton = False
Left = 48
Top = 136
end
object Cyclop1: TCyclop
SemaphoreName = 'Cyclop1'
ShowMessage = False
Left = 80
Top = 136
end
end