home *** CD-ROM | disk | FTP | other *** search
- object SplashScreen: TSplashScreen
- Left = 130
- Top = 172
- BorderStyle = bsDialog
- Caption = 'Welcome to SiteHog... please wait...'
- ClientHeight = 480
- ClientWidth = 632
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- FormStyle = fsStayOnTop
- Icon.Data = {<image000.ico>}
- Position = poScreenCenter
- Scaled = False
- OnCreate = FormCreate
- PixelsPerInch = 120
- TextHeight = 16
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 632
- Height = 480
- Align = alClient
- BevelInner = bvLowered
- BevelWidth = 2
- TabOrder = 0
- object Image1: TImage
- Left = 20
- Top = 36
- Width = 269
- Height = 340
- AutoSize = True
- Picture.Data = {<image001.bmp>}
- end
- object WaitLabel: TLabel
- Left = 8
- Top = 392
- Width = 289
- Height = 20
- Alignment = taCenter
- AutoSize = False
- Caption = 'Please wait while SiteHog loads...'
- Font.Color = clBlack
- Font.Height = -17
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsItalic]
- ParentFont = False
- end
- object UnregLabel: TLabel
- Left = 8
- Top = 8
- Width = 289
- Height = 20
- Alignment = taCenter
- Caption = 'Un-registered Evaluation Copy'
- Font.Color = clMaroon
- Font.Height = -17
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- WordWrap = True
- end
- object Panel5: TPanel
- Left = 16
- Top = 416
- Width = 281
- Height = 49
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 2
- end
- object Panel4: TPanel
- Left = 304
- Top = 16
- Width = 313
- Height = 449
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 0
- object VersionLabel: TLabel
- Left = 8
- Top = 153
- Width = 297
- Height = 32
- Alignment = taCenter
- AutoSize = False
- Caption = 'Version:'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- WordWrap = True
- IsControl = True
- end
- object Label2: TLabel
- Left = 8
- Top = 12
- Width = 297
- Height = 53
- Alignment = taCenter
- Caption = 'Red Hog Web Software presents...'
- Font.Color = clBlack
- Font.Height = -23
- Font.Name = 'Times New Roman'
- Font.Style = [fsItalic]
- ParentFont = False
- WordWrap = True
- IsControl = True
- end
- object SplashButtons: TBevel
- Left = 8
- Top = 400
- Width = 297
- Height = 41
- Shape = bsFrame
- end
- object Image2: TImage
- Left = 4
- Top = 72
- Width = 304
- Height = 72
- AutoSize = True
- Picture.Data = {<image002.bmp>}
- end
- object Registered: TLabel
- Left = 0
- Top = 248
- Width = 313
- Height = 137
- Alignment = taCenter
- AutoSize = False
- Caption = 'Registered'
- Font.Color = clBlack
- Font.Height = -17
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- Transparent = True
- Visible = False
- WordWrap = True
- end
- object SplashRegister: TBitBtn
- Left = 16
- Top = 408
- Width = 89
- Height = 25
- Caption = 'Register'
- Enabled = False
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- OnClick = SplashRegisterClick
- Kind = bkOK
- end
- object SplashEvaluate: TBitBtn
- Left = 112
- Top = 408
- Width = 89
- Height = 25
- Caption = 'Evaluate'
- Enabled = False
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = SplashEvaluateClick
- Kind = bkIgnore
- end
- object SplashAbort: TBitBtn
- Left = 208
- Top = 408
- Width = 89
- Height = 25
- Enabled = False
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- OnClick = SplashAbortClick
- Kind = bkAbort
- end
- object PleaseGroup: TGroupBox
- Left = 8
- Top = 192
- Width = 297
- Height = 113
- Caption = 'Please register your Shareware'
- TabOrder = 3
- object Label3: TLabel
- Left = 2
- Top = 18
- Width = 293
- Height = 93
- Align = alClient
- Caption =
- 'SiteHog is Shareware. You may evaluate it free of charge. If you' +
- ' find SiteHog useful and you continue to use SiteHog beyond a re' +
- 'asonable evaluation period, you are required to register the pro' +
- 'gram. '
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsItalic]
- ParentFont = False
- WordWrap = True
- end
- end
- object FailureGroup: TGroupBox
- Left = 8
- Top = 312
- Width = 297
- Height = 81
- Caption = 'Failure to Register...'
- TabOrder = 4
- object Label4: TLabel
- Left = 2
- Top = 18
- Width = 293
- Height = 61
- Align = alClient
- Alignment = taCenter
- Caption =
- '...will result in unquenchable guilt, eventually requiring thera' +
- 'py that will cost far in excess of the registration fee...'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsItalic]
- ParentFont = False
- WordWrap = True
- end
- end
- end
- object Panel2: TPanel
- Left = 24
- Top = 424
- Width = 265
- Height = 33
- Caption = 'Panel2'
- TabOrder = 1
- object LoadProgress: TProgressBar
- Left = 8
- Top = 8
- Width = 249
- Height = 17
- Min = 0
- Max = 6
- TabOrder = 0
- end
- end
- end
- object SiteHog: TProject
- AutoBackup = True
- BackupFiles = '*.dfm;*.pas;*.dpr;*.dof;*.dsk;*.res'
- BackupPath = 'd:\development\sitehogmdi'
- Build = 4
- Notes.Strings = (
- '29/12/96 21:12:20: Project start.'
- '29/12/96 21:30:43: Automatic backup made.'
- '29/12/96 21:30:43: Version 0.2'
- '31/12/96 20:30:09: Automatic backup made.'
- '31/12/96 20:30:09: Version 0.3'
- '01/01/97 23:34:09: Automatic backup made.'
- '01/01/97 23:34:09: Version 1.0')
- ProjectPath = 'd:\development\sitehogmdi'
- Version = '1.0'
- Left = 576
- Top = 24
- end
- end
-