object FormMain: TFormMain Left = 155 Top = 108 BorderStyle = bsNone Caption = 'FormMain' ClientHeight = 367 ClientWidth = 508 Color = clOlive Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter Visible = True OnCreate = FormCreate OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object PanelInstall: TPanel Left = 5 Top = 5 Width = 498 Height = 357 TabOrder = 0 Visible = False object Label1: TLabel Left = 9 Top = 246 Width = 21 Height = 16 Caption = '.....' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False end object LabelTitle: TLabel Left = 12 Top = 16 Width = 218 Height = 29 Caption = 'HJSplit installation' Font.Color = clBlack Font.Height = -24 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object Memo1: TMemo Left = 8 Top = 56 Width = 481 Height = 169 TabStop = False Color = clAqua Font.Color = clBlack Font.Height = -16 Font.Name = 'Arial' Font.Style = [] Lines.Strings = ( '') ParentFont = False ReadOnly = True ScrollBars = ssVertical TabOrder = 2 end object Edit1: TEdit Left = 8 Top = 264 Width = 417 Height = 24 Color = clAqua Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ReadOnly = True TabOrder = 1 end object ButtonScript: TButton Left = 376 Top = 312 Width = 113 Height = 33 Caption = '&Next >>' Font.Color = clWindowText Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 0 end object ButtonAbort: TButton Left = 10 Top = 312 Width = 65 Height = 33 Caption = '&Quit' Font.Color = clWindowText Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 3 TabStop = False OnClick = ButtonAbortClick end object ButtonEdit: TButton Left = 424 Top = 264 Width = 65 Height = 24 Caption = '&More...' Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 4 end end object PanelAbout: TPanel Left = 5 Top = 5 Width = 500 Height = 356 Caption = 'PanelAbout' Color = clSilver TabOrder = 1 object Label2: TLabel Left = 115 Top = 16 Width = 310 Height = 74 Caption = 'HJ-Install' Font.Color = clWhite Font.Height = -64 Font.Name = 'Arial' Font.Style = [fsBold, fsItalic] ParentFont = False end object Label5: TLabel Left = 112 Top = 14 Width = 305 Height = 74 Caption = 'HJ-Install' Font.Color = clPurple Font.Height = -64 Font.Name = 'Arial' Font.Style = [fsBold, fsItalic] ParentFont = False Transparent = True end object Label4: TLabel Left = 128 Top = 128 Width = 256 Height = 17 Caption = 'http://www.freebyte.com/freew1.htm' Font.Color = clYellow Font.Height = -15 Font.Name = 'Arial' Font.Style = [fsBold, fsItalic] ParentFont = False end object Label3: TLabel Left = 106 Top = 88 Width = 297 Height = 34 Caption = 'The freeware installer' Font.Color = clPurple Font.Height = -29 Font.Name = 'Arial' Font.Style = [fsBold, fsItalic] ParentFont = False end object Memo2: TMemo Left = 15 Top = 160 Width = 472 Height = 129 Color = clAqua Lines.Strings = ( 'Version 1.6' 'Created by Henk Hagedoorn' 'March 1997' 'Amsterdam' 'hjh@usa.net' 'freeware@bigfoot.com' '' 'For updates and other programs look at ' 'http://www.freebyte.com' 'http://www.freebyte.com/freew1.htm' 'http://hjh.simplex.nl/~hjh' '' 'This installation program is free.' 'However, any financial contributions' 'to support future software development' 'are welcome. You can contact' 'me for this at hjh@usa.net.' '' 'For programming assignments and other ' 'projects mail me at hjh@usa.net' '' 'You can distribute and use this installation program without any' + ' ' 'restrictions as freeware. You may even create a HJ-Install ' 'installation procedure for a commercial program. You may however' + ' ' 'not change the HJ-Install program itself.' '' 'The current version is somewhat limited, but future versions wil' + 'l ' 'have more possibilities.' 'Check the www site for downloading HJ-Install with installation ' 'script examples and a manual. Check this site also for updates a' + 'nd ' 'other software.') ReadOnly = True ScrollBars = ssVertical TabOrder = 0 end object ButtonNext: TButton Left = 375 Top = 311 Width = 113 Height = 33 Caption = '&Next >>' Font.Color = clWindowText Font.Height = -16 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnClick = ButtonNextClick end end object Timer1: TTimer Enabled = False Interval = 300 Left = 477 Top = 5 end end