Chip 2004 June/CHIP_CD_2004-06.iso/software/foto/faprosetup.exe/FotoAlbum.exe/0/RCDATA/TFORMNAGSCREEN/TFORMNAGSCREEN.txt

Text File | 2004-04-06 | 37.9 KB | 1,483 lines

object FormNagScreen: TFormNagScreen
  Left = 666
  Top = 574
  BorderIcons = [biMinimize, biMaximize]
  BorderStyle = bsNone
  Caption = 'FotoAlbum Evaluation'
  ClientHeight = 369
  ClientWidth = 462
  Color = clWhite
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Shape1: TShape
    Left = 0
    Top = 0
    Width = 462
    Height = 369
    Align = alClient
  end
  object Image2: TImage
    Left = 1
    Top = 1
    Width = 400
    Height = 119
    Picture.Data = {<image000.jpg>}
  end
  object ImageWelcome: TImage
    Left = 1
    Top = 1
    Width = 400
    Height = 119
    Picture.Data = {<image001.bmp>}
  end
  object NotebookNag: TNotebook
    Left = 2
    Top = 119
    Width = 440
    Height = 242
    PageIndex = 6
    TabOrder = 0
    OnPageChanged = NotebookNagPageChanged
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsWelcome'
      object PanelWelcome: TPanel
        Left = 0
        Top = 0
        Width = 440
        Height = 242
        Align = alClient
        BevelOuter = bvNone
        Color = clWhite
        TabOrder = 0
        object Label2: TLabel
          Left = 41
          Top = 149
          Width = 377
          Height = 20
          AutoSize = False
          Caption =
            'In order to activate FotoAlbum Pro, you must be connected to the' +
            ' Internet.'
          WordWrap = True
        end
        object Label5: TLabel
          Left = 41
          Top = 22
          Width = 367
          Height = 39
          Caption =
            'In order to activate FotoAlbum Pro, we need to know if you are c' +
            'urrently a paid subscriber to the FotoTime online photo sharing ' +
            'service?'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clInactiveCaption
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          WordWrap = True
        end
        object Image41: TImage
          Left = 11
          Top = 184
          Width = 69
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image002.bmp>}
          OnClick = BtnSubBuyClick
        end
        object Image48: TImage
          Left = 84
          Top = 184
          Width = 69
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image003.bmp>}
          OnClick = BtnEnterKeyClick
        end
        object Image39: TImage
          Left = 302
          Top = 184
          Width = 43
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image004.bmp>}
          OnClick = BtnExitClick
        end
        object BtnWelcomeContinue: TImage
          Left = 348
          Top = 184
          Width = 69
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image005.bmp>}
          OnClick = BtnWelcomeContinueClick
        end
        object rbIsSubscriber: TRadioButton
          Left = 46
          Top = 77
          Width = 360
          Height = 17
          Caption =
            'Yes, I purchased a FotoTime account that I use to share photos o' +
            'nline.'
          TabOrder = 0
        end
        object rbNotSubscriber: TRadioButton
          Left = 46
          Top = 99
          Width = 360
          Height = 33
          Caption =
            'No, I simply want to use FotoAlbum to organize photos on my comp' +
            'uter, and don'#39't have a FotoTime account.'
          TabOrder = 1
          WordWrap = True
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsDuringEvalSub'
      object PanelDuringEvalSubscriber: TPanel
        Left = 0
        Top = 0
        Width = 440
        Height = 242
        Align = alClient
        BevelOuter = bvNone
        Color = clWhite
        TabOrder = 0
        object Label3: TLabel
          Left = 24
          Top = 29
          Width = 377
          Height = 28
          AutoSize = False
          Caption =
            'Features that FotoAlbum Pro provides not found in the FREE subsc' +
            'riber version of FotoAlbum include:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clInactiveCaption
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          WordWrap = True
        end
        object Label17: TLabel
          Left = 293
          Top = 69
          Width = 36
          Height = 13
          Caption = 'FotoCD'
        end
        object Label43: TLabel
          Left = 293
          Top = 105
          Width = 44
          Height = 13
          Caption = 'Archiving'
        end
        object Label44: TLabel
          Left = 293
          Top = 87
          Width = 64
          Height = 13
          Caption = 'Import/Export'
        end
        object Label45: TLabel
          Left = 53
          Top = 69
          Width = 124
          Height = 13
          Caption = 'Create PhotoShow Videos'
        end
        object Label46: TLabel
          Left = 53
          Top = 87
          Width = 113
          Height = 13
          Caption = 'Duplicate Picture Finder'
        end
        object Label48: TLabel
          Left = 53
          Top = 105
          Width = 174
          Height = 13
          Caption = 'Update captions and dates into EXIF'
        end
        object Label6: TLabel
          Left = 24
          Top = 132
          Width = 378
          Height = 39
          Caption =
            'As a subscriber to the FotoTime online photo sharing service, yo' +
            'u can purchase a discounted upgrade to FotoAlbum Pro, or you can' +
            ' continue to use FotoAlbum without the new Pro features for free' +
            '.'
          WordWrap = True
        end
        object Image1: TImage
          Left = 55
          Top = 2
          Width = 325
          Height = 21
          AutoSize = True
          Picture.Data = {<image006.bmp>}
        end
        object LblNumSubEvalDaysLeft: TLabel
          Left = 328
          Top = 4
          Width = 18
          Height = 16
          Caption = '30'
          Color = 6723942
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -13
          Font.Name = 'Verdana'
          Font.Style = [fsBold]
          ParentColor = False
          ParentFont = False
        end
        object Image6: TImage
          Left = 157
          Top = 184
          Width = 124
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image007.bmp>}
          OnClick = BtnDontWantProClick
        end
        object BtnContinueSubEval: TImage
          Left = 285
          Top = 184
          Width = 154
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image008.bmp>}
          OnClick = BtnContinueSubEvalClick
        end
        object Image8: TImage
          Left = 11
          Top = 184
          Width = 69
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image009.bmp>}
          OnClick = BtnSubBuyClick
        end
        object Image29: TImage
          Left = 40
          Top = 69
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image010.bmp>}
        end
        object Image30: TImage
          Left = 40
          Top = 87
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image011.bmp>}
        end
        object Image31: TImage
          Left = 40
          Top = 105
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image012.bmp>}
        end
        object Image32: TImage
          Left = 280
          Top = 69
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image013.bmp>}
        end
        object Image33: TImage
          Left = 280
          Top = 87
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image014.bmp>}
        end
        object Image34: TImage
          Left = 280
          Top = 105
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image015.bmp>}
        end
        object Image35: TImage
          Left = 84
          Top = 184
          Width = 69
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image016.bmp>}
          OnClick = BtnEnterKeyClick
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsDuringEvalNonSub'
      object PanelDuringEvalNonSubscriber: TPanel
        Left = 0
        Top = 0
        Width = 440
        Height = 242
        Align = alClient
        BevelOuter = bvNone
        Color = clWhite
        TabOrder = 0
        object Label23: TLabel
          Left = 16
          Top = 29
          Width = 369
          Height = 39
          Caption =
            'You are currently evaluating FotoAlbum Pro, the perfect tool for' +
            ' organizing a lifetime of pictures and videos.  Only FotoAlbum P' +
            'ro includes all these features in one tool:'
          WordWrap = True
        end
        object Label37: TLabel
          Left = 245
          Top = 77
          Width = 145
          Height = 13
          Caption = 'Creates auto-running Foto CDs'
        end
        object Label38: TLabel
          Left = 43
          Top = 95
          Width = 132
          Height = 13
          Caption = 'Integrated archiving support'
        end
        object Label39: TLabel
          Left = 43
          Top = 114
          Width = 132
          Height = 13
          Caption = 'Import and export meta-data'
        end
        object Label40: TLabel
          Left = 245
          Top = 95
          Width = 128
          Height = 13
          Caption = 'Creates PhotoShow videos'
        end
        object Label41: TLabel
          Left = 43
          Top = 133
          Width = 109
          Height = 13
          Caption = 'Duplicate picture finder'
        end
        object Label42: TLabel
          Left = 29
          Top = 156
          Width = 86
          Height = 13
          Cursor = crHandPoint
          Caption = 'And much more ...'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlue
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsUnderline]
          ParentFont = False
          OnClick = Label42Click
        end
        object Label1: TLabel
          Left = 43
          Top = 77
          Width = 147
          Height = 13
          Caption = 'Album and Group Management'
        end
        object Label7: TLabel
          Left = 245
          Top = 114
          Width = 142
          Height = 13
          Caption = 'Imports and exports EXIF data'
        end
        object Image3: TImage
          Left = 55
          Top = 2
          Width = 325
          Height = 21
          AutoSize = True
          Picture.Data = {<image017.bmp>}
        end
        object LblNumDaysLeft: TLabel
          Left = 328
          Top = 4
          Width = 18
          Height = 16
          Caption = '30'
          Color = 6723942
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWhite
          Font.Height = -13
          Font.Name = 'Verdana'
          Font.Style = [fsBold]
          ParentColor = False
          ParentFont = False
        end
        object Image4: TImage
          Left = 185
          Top = 184
          Width = 69
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image018.bmp>}
          OnClick = BtnBuyNow1Click
        end
        object BtnContinueEval: TImage
          Left = 273
          Top = 184
          Width = 154
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image019.bmp>}
          OnClick = BtnContinueEvalClick
        end
        object Image22: TImage
          Left = 30
          Top = 77
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image020.bmp>}
        end
        object Image23: TImage
          Left = 30
          Top = 95
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image021.bmp>}
        end
        object Image24: TImage
          Left = 30
          Top = 114
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image022.bmp>}
        end
        object Image25: TImage
          Left = 30
          Top = 133
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image023.bmp>}
        end
        object Image26: TImage
          Left = 232
          Top = 77
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image024.bmp>}
        end
        object Image27: TImage
          Left = 232
          Top = 95
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image025.bmp>}
        end
        object Image28: TImage
          Left = 232
          Top = 114
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image026.bmp>}
        end
        object Image9: TImage
          Left = 100
          Top = 184
          Width = 69
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image027.bmp>}
          OnClick = BtnEnterKeyClick
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsAfterEvalNonSub'
      object PanelNonSubAfterEval: TPanel
        Left = 0
        Top = 0
        Width = 440
        Height = 242
        Align = alClient
        BevelOuter = bvNone
        Color = clWhite
        TabOrder = 0
        object Label9: TLabel
          Left = 32
          Top = 24
          Width = 241
          Height = 13
          Caption = 'Your evaluation of FotoAlbum has expired.'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label10: TLabel
          Left = 48
          Top = 61
          Width = 75
          Height = 13
          Caption = 'Expiration Date:'
        end
        object LblExpireDate: TLabel
          Left = 136
          Top = 61
          Width = 80
          Height = 13
          Caption = 'LblExpireDate'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label11: TLabel
          Left = 32
          Top = 100
          Width = 327
          Height = 26
          Caption =
            'To continue using FotoAlbum, and to ensure that you get free sup' +
            'port and product updates, click on the Buy Now button below.'
          WordWrap = True
        end
        object LblPause: TLabel
          Left = 255
          Top = 144
          Width = 53
          Height = 13
          Caption = 'LblPause'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label18: TLabel
          Left = 32
          Top = 144
          Width = 218
          Height = 13
          Caption = 'You can continue in a limited mode in:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object BtnContinueLimited: TImage
          Left = 210
          Top = 184
          Width = 223
          Height = 21
          Cursor = crNo
          AutoSize = True
          Picture.Data = {<image028.bmp>}
          OnClick = BtnContinueLimitedClick
        end
        object Image11: TImage
          Left = 86
          Top = 184
          Width = 43
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image029.bmp>}
          OnClick = BtnExitClick
        end
        object Image12: TImage
          Left = 13
          Top = 184
          Width = 69
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image030.bmp>}
          OnClick = BtnBuyAfterEvalClick
        end
        object Image36: TImage
          Left = 134
          Top = 184
          Width = 69
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image031.bmp>}
          OnClick = BtnEnterKeyClick
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsProAdvantages'
      object PanelProAdvantages: TPanel
        Left = 0
        Top = 0
        Width = 440
        Height = 242
        Align = alClient
        BevelOuter = bvNone
        Color = clWhite
        TabOrder = 0
        object Image18: TImage
          Left = 40
          Top = 52
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image032.bmp>}
        end
        object Label47: TLabel
          Left = 53
          Top = 52
          Width = 124
          Height = 13
          Caption = 'Create PhotoShow Videos'
        end
        object Image42: TImage
          Left = 40
          Top = 70
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image033.bmp>}
        end
        object Label56: TLabel
          Left = 53
          Top = 70
          Width = 113
          Height = 13
          Caption = 'Duplicate Picture Finder'
        end
        object Image45: TImage
          Left = 40
          Top = 88
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image034.bmp>}
        end
        object Label57: TLabel
          Left = 53
          Top = 88
          Width = 174
          Height = 13
          Caption = 'Update captions and dates into EXIF'
        end
        object Image46: TImage
          Left = 280
          Top = 52
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image035.bmp>}
        end
        object Label58: TLabel
          Left = 293
          Top = 52
          Width = 36
          Height = 13
          Caption = 'FotoCD'
        end
        object Image47: TImage
          Left = 280
          Top = 70
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image036.bmp>}
        end
        object Label59: TLabel
          Left = 293
          Top = 70
          Width = 64
          Height = 13
          Caption = 'Import/Export'
        end
        object Image49: TImage
          Left = 280
          Top = 88
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image037.bmp>}
        end
        object Label60: TLabel
          Left = 293
          Top = 88
          Width = 44
          Height = 13
          Caption = 'Archiving'
        end
        object Image50: TImage
          Left = 11
          Top = 184
          Width = 69
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image038.bmp>}
          OnClick = BtnSubBuyClick
        end
        object Image51: TImage
          Left = 84
          Top = 184
          Width = 69
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image039.bmp>}
          OnClick = BtnEnterKeyClick
        end
        object Image52: TImage
          Left = 157
          Top = 184
          Width = 124
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image040.bmp>}
          OnClick = BtnDontWantProClick
        end
        object Image53: TImage
          Left = 285
          Top = 184
          Width = 132
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image041.bmp>}
          OnClick = BtnContinueSubEvalClick
        end
        object Label61: TLabel
          Left = 24
          Top = 9
          Width = 369
          Height = 40
          AutoSize = False
          Caption =
            'FotoAlbum Pro includes these features not found in the free vers' +
            'ion of FotoAlbum.'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clInactiveCaption
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          WordWrap = True
        end
        object Label24: TLabel
          Left = 24
          Top = 116
          Width = 376
          Height = 39
          Caption =
            'Select an option using the buttons below.  Click Start Evalution' +
            ' to start a free 21 day trial of FotoAlbum Pro.  Click Free Foto' +
            'Album if you don'#39't want to try Pro and simply want the free vers' +
            'ion of FotoAlbum.'
          WordWrap = True
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsRegisterSubscriber'
      object PanelRegisterSubscriber: TPanel
        Left = 0
        Top = 0
        Width = 440
        Height = 242
        Align = alClient
        BevelOuter = bvNone
        Color = clWhite
        TabOrder = 0
        object Label20: TLabel
          Left = 27
          Top = 18
          Width = 375
          Height = 39
          Caption =
            'Please enter the e-mail address and password that your FotoTime ' +
            'account is registered with.  We need this to confirm that you ar' +
            'e eligible for the FREE FotoAlbum upgrade.'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clInactiveCaption
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          WordWrap = True
        end
        object BtnBackS: TImage
          Left = 256
          Top = 184
          Width = 51
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image042.bmp>}
          OnClick = BtnBackSClick
        end
        object Image43: TImage
          Left = 313
          Top = 184
          Width = 106
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image043.bmp>}
          OnClick = BtnRegisterSubscriberNowClick
        end
        object Image44: TImage
          Left = 30
          Top = 184
          Width = 43
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image044.bmp>}
          OnClick = BtnExitClick
        end
        object Label26: TLabel
          Left = 61
          Top = 92
          Width = 69
          Height = 13
          Caption = 'E-Mail address'
        end
        object Label28: TLabel
          Left = 61
          Top = 120
          Width = 46
          Height = 13
          Caption = 'Password'
        end
        object EditSubEmail: TEdit
          Left = 141
          Top = 88
          Width = 169
          Height = 21
          TabOrder = 0
        end
        object EditSubPassword: TEdit
          Left = 141
          Top = 116
          Width = 169
          Height = 21
          PasswordChar = '*'
          TabOrder = 1
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsRegister'
      object PanelRegister: TPanel
        Left = 0
        Top = 0
        Width = 440
        Height = 242
        Align = alClient
        BevelOuter = bvNone
        Color = clWhite
        TabOrder = 0
        object Label4: TLabel
          Left = 69
          Top = 138
          Width = 51
          Height = 13
          Caption = 'Last Name'
        end
        object Label12: TLabel
          Left = 69
          Top = 110
          Width = 50
          Height = 13
          Caption = 'First Name'
        end
        object Label13: TLabel
          Left = 69
          Top = 82
          Width = 69
          Height = 13
          Caption = 'E-Mail address'
        end
        object Label49: TLabel
          Left = 25
          Top = 12
          Width = 400
          Height = 52
          Caption =
            'Please enter your e-mail address and name to activate your FotoA' +
            'lbum Pro trial.  This entitles you to free support during your e' +
            'valuation, and insures that you will receive notices about produ' +
            'ct updates and special offers.'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clInactiveCaption
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          WordWrap = True
        end
        object Label14: TLabel
          Left = 149
          Top = 159
          Width = 167
          Height = 13
          Cursor = crHandPoint
          Caption = 'Click here to see our privacy policy.'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clHotLight
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsUnderline]
          ParentFont = False
          OnClick = Label14Click
        end
        object Image14: TImage
          Left = 318
          Top = 184
          Width = 106
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image045.bmp>}
          OnClick = BtnRegisterNowClick
        end
        object Image37: TImage
          Left = 30
          Top = 184
          Width = 43
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image046.bmp>}
          OnClick = BtnExitClick
        end
        object BtnBack: TImage
          Left = 261
          Top = 184
          Width = 51
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image047.bmp>}
          OnClick = BtnBackSClick
        end
        object EditEmail: TEdit
          Left = 149
          Top = 78
          Width = 169
          Height = 21
          TabOrder = 0
        end
        object EditLastName: TEdit
          Left = 149
          Top = 135
          Width = 169
          Height = 21
          TabOrder = 2
        end
        object EditFirstName: TEdit
          Left = 149
          Top = 106
          Width = 169
          Height = 21
          TabOrder = 1
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsThanksSub'
      object PanelRegisteredSubscriber: TPanel
        Left = 0
        Top = 0
        Width = 440
        Height = 242
        Align = alClient
        BevelOuter = bvNone
        Color = clWhite
        TabOrder = 0
        object Label27: TLabel
          Left = 27
          Top = 41
          Width = 369
          Height = 39
          Caption =
            'As a FotoTime subscriber, you get a license to use FotoAlbum for' +
            ' FREE.  As a bonus, you also qualify for a free trial to evaluat' +
            'e the new Professional features of FotoAlbum Pro.'
          WordWrap = True
        end
        object Label54: TLabel
          Left = 27
          Top = 142
          Width = 369
          Height = 32
          AutoSize = False
          Caption =
            'It'#39's your choice.  You can either start using the FREE version o' +
            'f FotoAlbum now, or evaluate the Pro features for free for 21 da' +
            'ys with no obligations. '
          WordWrap = True
        end
        object Label55: TLabel
          Left = 27
          Top = 1
          Width = 359
          Height = 26
          Caption =
            'Thank you for registering your copy of FotoAlbum. Please read th' +
            'e following information carefully.'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clInactiveCaption
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
          WordWrap = True
        end
        object BtnNext: TImage
          Left = 354
          Top = 184
          Width = 51
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image048.bmp>}
          OnClick = BtnNextClick
        end
        object Label36: TLabel
          Left = 27
          Top = 90
          Width = 364
          Height = 39
          Caption =
            'At the end of the trial, you can upgrade to FotoAlbum Pro for a ' +
            'discounted price, or you can continue to use FotoAlbum without t' +
            'he new Pro features for free.'
          WordWrap = True
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsThanksNonSub'
      object PanelRegisteredNonSubscriber: TPanel
        Left = 0
        Top = 0
        Width = 440
        Height = 242
        Align = alClient
        BevelOuter = bvNone
        Color = clWhite
        TabOrder = 0
        object Label29: TLabel
          Left = 24
          Top = 1
          Width = 344
          Height = 26
          Caption =
            'Thank you for registering your copy of FotoAlbum Pro.  Your regi' +
            'stration entitles you to free support and update notifications d' +
            'uring the trial period.'
          WordWrap = True
        end
        object Label8: TLabel
          Left = 24
          Top = 43
          Width = 361
          Height = 26
          Caption =
            'Your can learn more about FotoAlbum and its features in the Foto' +
            'Album help documentation available in the help menu.'
          WordWrap = True
        end
        object Label15: TLabel
          Left = 24
          Top = 90
          Width = 329
          Height = 13
          Caption =
            'If you need more help we encourage you to try our Support Forums' +
            ' at:'
        end
        object Label16: TLabel
          Left = 24
          Top = 107
          Width = 161
          Height = 13
          Cursor = crHandPoint
          Caption = 'http://forums.fototime.com/forums'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clHotLight
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsUnderline]
          ParentFont = False
          OnClick = Label16Click
        end
        object Label50: TLabel
          Left = 24
          Top = 143
          Width = 179
          Height = 13
          Caption = 'Or you can e-mail our support desk at:'
        end
        object Label51: TLabel
          Left = 24
          Top = 160
          Width = 106
          Height = 13
          Caption = '[e-mail]'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clHotLight
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsUnderline]
          ParentFont = False
          OnClick = Label51Click
        end
        object Image16: TImage
          Left = 354
          Top = 184
          Width = 51
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image049.bmp>}
          OnClick = Button3Click
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsTurnedOffPro'
      object PanelDontWantPro: TPanel
        Left = 0
        Top = 0
        Width = 440
        Height = 242
        Align = alClient
        BevelOuter = bvNone
        Color = clWhite
        ParentBackground = True
        TabOrder = 0
        object Label19: TLabel
          Left = 27
          Top = 7
          Width = 334
          Height = 39
          Caption =
            'You have decided to not purchase FotoAlbum Pro.  As a subscriber' +
            ' to the FotoTime online photo sharing service, you can still use' +
            ' FotoAlbum for free, but the following Pro features will be disa' +
            'bled:'
          WordWrap = True
        end
        object Label21: TLabel
          Left = 276
          Top = 62
          Width = 36
          Height = 13
          Caption = 'FotoCD'
        end
        object Label22: TLabel
          Left = 27
          Top = 133
          Width = 342
          Height = 26
          Caption =
            'If you later decide that you want the Pro features, you can purc' +
            'hase FotoAlbum Pro by using the "Buy FotoAlbum Pro" menu option ' +
            'in "Help".'
          WordWrap = True
        end
        object Label31: TLabel
          Left = 275
          Top = 99
          Width = 44
          Height = 13
          Caption = 'Archiving'
        end
        object Label32: TLabel
          Left = 275
          Top = 80
          Width = 64
          Height = 13
          Caption = 'Import/Export'
        end
        object Label33: TLabel
          Left = 51
          Top = 80
          Width = 113
          Height = 13
          Caption = 'Duplicate Picture Finder'
        end
        object Label34: TLabel
          Left = 51
          Top = 62
          Width = 124
          Height = 13
          Caption = 'Create PhotoShow Videos'
        end
        object Label35: TLabel
          Left = 51
          Top = 99
          Width = 174
          Height = 13
          Caption = 'Update captions and dates into EXIF'
        end
        object Image17: TImage
          Left = 350
          Top = 184
          Width = 51
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image050.bmp>}
          OnClick = BtnCloseClick
        end
        object Image5: TImage
          Left = 40
          Top = 62
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image051.bmp>}
        end
        object Image7: TImage
          Left = 40
          Top = 80
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image052.bmp>}
        end
        object Image10: TImage
          Left = 40
          Top = 99
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image053.bmp>}
        end
        object Image19: TImage
          Left = 264
          Top = 62
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image054.bmp>}
        end
        object Image20: TImage
          Left = 264
          Top = 80
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image055.bmp>}
        end
        object Image21: TImage
          Left = 264
          Top = 99
          Width = 8
          Height = 10
          AutoSize = True
          Picture.Data = {<image056.bmp>}
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsHiddenGraphics'
      object PanelButtons: TPanel
        Left = 0
        Top = 0
        Width = 440
        Height = 242
        Align = alClient
        BevelOuter = bvNone
        Caption = 'PanelButtons'
        Color = clWhite
        TabOrder = 0
        object imgStartEvaluation: TImage
          Left = 16
          Top = 8
          Width = 132
          Height = 21
          AutoSize = True
          Picture.Data = {<image057.bmp>}
        end
        object imgContinue: TImage
          Left = 160
          Top = 8
          Width = 69
          Height = 21
          AutoSize = True
          Picture.Data = {<image058.bmp>}
        end
        object imgContinueWithLimitedFeatures: TImage
          Left = 16
          Top = 40
          Width = 223
          Height = 21
          AutoSize = True
          Picture.Data = {<image059.bmp>}
        end
        object Image13: TImage
          Left = 19
          Top = 72
          Width = 112
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image060.bmp>}
          Visible = False
          OnClick = BtnRegisterLaterClick
        end
        object Image15: TImage
          Left = 16
          Top = 136
          Width = 112
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image061.bmp>}
          Visible = False
          OnClick = BtnNeverRegisterClick
        end
        object Image38: TImage
          Left = 147
          Top = 72
          Width = 112
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image062.bmp>}
          Visible = False
          OnClick = BtnRegisterLaterClick
        end
        object Image40: TImage
          Left = 16
          Top = 104
          Width = 112
          Height = 21
          Cursor = crHandPoint
          AutoSize = True
          Picture.Data = {<image063.bmp>}
          Visible = False
          OnClick = BtnNeverRegisterClick
        end
      end
    end
  end
  object PanelCopyright: TPanel
    Left = 8
    Top = 346
    Width = 305
    Height = 20
    BevelOuter = bvNone
    Color = clWhite
    TabOrder = 1
    DesignSize = (
      305
      20)
    object Label25: TLabel
      Left = 4
      Top = 2
      Width = 261
      Height = 13
      Anchors = [akLeft, akBottom]
      Caption = 'Copyright 1999-2004 FotoTime, Inc.  All rights reserved.'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGray
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
    end
  end
  object TimerPause: TTimer
    Enabled = False
    OnTimer = TimerPauseTimer
    Left = 360
    Top = 8
  end
end