home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 1999 August
/
PCWorld_1999-08_cd.bin
/
Komunik
/
AtomNet
/
atomnet.exe
/
setup.exe
/
0
/
RCDATA
/
TFSETUP
/
TFSETUP.txt
< prev
Wrap
Text File
|
1999-06-27
|
3KB
|
131 lines
object Fsetup: TFsetup
Left = 341
Top = 227
BorderIcons = [biSystemMenu]
BorderStyle = bsToolWindow
Caption = 'AtomNet Setup'
ClientHeight = 180
ClientWidth = 386
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 29
Top = 57
Width = 79
Height = 13
Caption = 'Program location'
end
object mes: TLabel
Left = 103
Top = 108
Width = 180
Height = 13
Alignment = taCenter
AutoSize = False
end
object Image1: TImage
Left = 29
Top = 14
Width = 32
Height = 32
AutoSize = True
Picture.Data = {<image000.ico>}
end
object Label2: TLabel
Left = 72
Top = 15
Width = 235
Height = 16
Caption = 'AtomNetPE 1.05 (c) Change7 1999'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object UrlLabel1: TUrlLabel
Left = 72
Top = 33
Width = 111
Height = 16
Cursor = 5
Caption = 'www.change7.com'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsUnderline]
ParentFont = False
PopupMenu = UrlLabel1.
URL = 'http://change7.com'
end
object Edit1: TEdit
Left = 29
Top = 73
Width = 271
Height = 21
TabOrder = 0
end
object Button1: TButton
Left = 307
Top = 73
Width = 50
Height = 22
Caption = 'Browse'
TabOrder = 1
OnClick = Button1Click
end
object Button2: TButton
Left = 109
Top = 142
Width = 75
Height = 24
Caption = 'Install'
Default = True
TabOrder = 2
OnClick = Button2Click
end
object closeb: TButton
Left = 202
Top = 142
Width = 75
Height = 25
Cancel = True
Caption = 'Close'
TabOrder = 3
OnClick = closebClick
end
object pbar: TProgressBar
Left = 103
Top = 108
Width = 180
Height = 16
Min = 0
Max = 100
TabOrder = 4
Visible = False
end
object FolderBrowse1: TFolderBrowse
Left = 3
Top = 133
end
object files: TStringHolder
Strings.Strings = (
'index.zit'
'atomnet.exe'
'uninst.exe'
'urls.ini')
Left = 331
Top = 20
end
end