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

Text File | 2004-04-06 | 35.2 KB | 1,434 lines

object FormAcctWizard: TFormAcctWizard
  Left = 325
  Top = 165
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Account Wizard'
  ClientHeight = 317
  ClientWidth = 503
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnActivate = FormActivate
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnResize = FormResize
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object PanelButtons: TPanel
    Left = 0
    Top = 276
    Width = 503
    Height = 41
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 0
    object Bevel1: TBevel
      Left = 0
      Top = 0
      Width = 503
      Height = 2
      Align = alTop
    end
    object BtnBack: TButton
      Left = 220
      Top = 8
      Width = 75
      Height = 25
      Caption = '< Back'
      TabOrder = 0
      OnClick = BtnBackClick
    end
    object BtnNext: TButton
      Left = 295
      Top = 8
      Width = 75
      Height = 25
      Caption = 'Next >'
      Default = True
      TabOrder = 1
      OnClick = BtnNextClick
    end
    object BtnCancel: TButton
      Left = 391
      Top = 8
      Width = 75
      Height = 25
      Cancel = True
      Caption = 'Cancel'
      TabOrder = 2
      OnClick = BtnCancelClick
    end
  end
  object NoteWizard: TNotebook
    Left = 0
    Top = 49
    Width = 503
    Height = 227
    Align = alClient
    PageIndex = 13
    TabOrder = 1
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsIntro'
      object PanelIntro: TPanel
        Left = 0
        Top = 0
        Width = 503
        Height = 227
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        object Panel2: TPanel
          Left = 0
          Top = 0
          Width = 160
          Height = 227
          Align = alLeft
          BevelOuter = bvNone
          TabOrder = 0
          object Image1: TImage
            Left = 0
            Top = 0
            Width = 160
            Height = 227
            Align = alClient
          end
        end
        object Panel3: TPanel
          Left = 160
          Top = 0
          Width = 343
          Height = 227
          Align = alClient
          BevelOuter = bvNone
          Color = clWindow
          TabOrder = 1
          DesignSize = (
            343
            227)
          object Label1: TLabel
            Left = 14
            Top = 11
            Width = 211
            Height = 40
            Caption = 'Welcome to the FotoTime Account Wizard'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -16
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold]
            ParentFont = False
            WordWrap = True
          end
          object Label2: TLabel
            Left = 21
            Top = 56
            Width = 249
            Height = 39
            Anchors = [akLeft, akTop, akRight]
            Caption =
              'This helps you setup a FotoTime account or enter activation id'#39's' +
              '. FotoTime accounts are used to share pictures on the web and ev' +
              'aluate optional features.'
            WordWrap = True
          end
          object RbUseExist: TRadioButton
            Left = 21
            Top = 146
            Width = 277
            Height = 17
            Anchors = [akLeft, akTop, akRight]
            Caption = 'I already have a FotoTime account'
            TabOrder = 0
          end
          object rbAddNew: TRadioButton
            Left = 21
            Top = 120
            Width = 309
            Height = 25
            Anchors = [akLeft, akTop, akRight]
            Caption = 'I want to create a new FotoTime account'
            Checked = True
            TabOrder = 1
            TabStop = True
          end
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsAddNew'
      object PanelAddNew: TPanel
        Left = 0
        Top = 0
        Width = 503
        Height = 227
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        DesignSize = (
          503
          227)
        object Label5: TLabel
          Left = 96
          Top = 53
          Width = 70
          Height = 13
          Caption = 'E-Mail Address'
        end
        object Label7: TLabel
          Left = 116
          Top = 77
          Width = 50
          Height = 13
          Caption = 'First Name'
        end
        object Label6: TLabel
          Left = 115
          Top = 101
          Width = 51
          Height = 13
          Caption = 'Last Name'
        end
        object Label8: TLabel
          Left = 120
          Top = 135
          Width = 46
          Height = 13
          Caption = 'Password'
        end
        object Label9: TLabel
          Left = 82
          Top = 159
          Width = 84
          Height = 13
          Caption = 'Confirm Password'
        end
        object lbAddNewStatus: TLabel
          Left = 24
          Top = 207
          Width = 79
          Height = 13
          Anchors = [akLeft, akBottom]
          Caption = 'lbAddNewStatus'
          Visible = False
        end
        object Label4: TLabel
          Left = 48
          Top = 8
          Width = 340
          Height = 26
          Anchors = [akLeft, akTop, akRight]
          Caption =
            'Enter your FotoTime account information below.  When you are fin' +
            'ished click the Create button and the new account will be create' +
            'd.'
          WordWrap = True
        end
        object Label13: TLabel
          Left = 80
          Top = 186
          Width = 175
          Height = 13
          Anchors = [akLeft, akBottom]
          Caption = 'Refer to FotoTime'#39's Privacy policy at:'
        end
        object Label32: TLabel
          Left = 264
          Top = 186
          Width = 87
          Height = 13
          Cursor = crHandPoint
          Anchors = [akLeft, akBottom]
          Caption = 'www.fototime.com'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlue
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsUnderline]
          ParentFont = False
          OnClick = Label32Click
        end
        object Label37: TLabel
          Left = 417
          Top = 124
          Width = 36
          Height = 13
          Caption = 'Country'
          Visible = False
        end
        object EditEmailAddress: TEdit
          Left = 176
          Top = 49
          Width = 177
          Height = 21
          TabOrder = 0
        end
        object EditFirstName: TEdit
          Left = 176
          Top = 73
          Width = 177
          Height = 21
          TabOrder = 1
        end
        object EditLastName: TEdit
          Left = 176
          Top = 97
          Width = 177
          Height = 21
          TabOrder = 2
        end
        object EditPwd: TEdit
          Left = 176
          Top = 131
          Width = 177
          Height = 21
          PasswordChar = '*'
          TabOrder = 3
        end
        object EditConfirmPwd: TEdit
          Left = 176
          Top = 155
          Width = 177
          Height = 21
          PasswordChar = '*'
          TabOrder = 4
        end
        object cbRegisterCountry: TComboBox
          Left = 456
          Top = 121
          Width = 145
          Height = 21
          Style = csDropDownList
          ItemHeight = 0
          TabOrder = 5
          Visible = False
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsUseExist'
      object PanelUseExist: TPanel
        Left = 0
        Top = 0
        Width = 503
        Height = 227
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        DesignSize = (
          503
          227)
        object Label3: TLabel
          Left = 48
          Top = 16
          Width = 341
          Height = 13
          Caption =
            'Enter the E-Mail address and password of an existing FotoTime ac' +
            'count.'
          WordWrap = True
        end
        object Label11: TLabel
          Left = 64
          Top = 67
          Width = 70
          Height = 13
          Caption = 'E-Mail Address'
        end
        object Label12: TLabel
          Left = 88
          Top = 98
          Width = 46
          Height = 13
          Caption = 'Password'
        end
        object lbUseExistStatus: TLabel
          Left = 48
          Top = 205
          Width = 79
          Height = 13
          Anchors = [akLeft, akBottom]
          Caption = 'lbUseExistStatus'
        end
        object EditExistEmailAddress: TEdit
          Left = 147
          Top = 65
          Width = 161
          Height = 21
          TabOrder = 0
        end
        object EditExistPwd: TEdit
          Left = 147
          Top = 95
          Width = 161
          Height = 21
          PasswordChar = '*'
          TabOrder = 1
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsModifyEmail'
      object PanelModifyEmail: TPanel
        Left = 0
        Top = 0
        Width = 503
        Height = 227
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        DesignSize = (
          503
          227)
        object lbModifyEmailStatus: TLabel
          Left = 47
          Top = 208
          Width = 94
          Height = 13
          Anchors = [akLeft, akBottom]
          Caption = 'lbModifyEmailStatus'
          Visible = False
        end
        object Label10: TLabel
          Left = 40
          Top = 8
          Width = 321
          Height = 13
          Caption =
            'Enter your new E-Mail address, then click Next to make the chang' +
            'e.'
        end
        object Label15: TLabel
          Left = 50
          Top = 47
          Width = 89
          Height = 13
          Caption = 'Old E-Mail Address'
        end
        object Label16: TLabel
          Left = 50
          Top = 73
          Width = 95
          Height = 13
          Caption = 'New E-Mail Address'
        end
        object Label17: TLabel
          Left = 50
          Top = 99
          Width = 90
          Height = 13
          Caption = 'Confirm new E-Mail'
        end
        object EditOrigEmail: TEdit
          Left = 157
          Top = 44
          Width = 175
          Height = 21
          Color = clBtnFace
          ReadOnly = True
          TabOrder = 0
        end
        object EditNewEmail: TEdit
          Left = 157
          Top = 70
          Width = 175
          Height = 21
          TabOrder = 1
        end
        object EditConfirmEMail: TEdit
          Left = 157
          Top = 96
          Width = 175
          Height = 21
          TabOrder = 2
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsFinished'
      object PanelComplete: TPanel
        Left = 0
        Top = 0
        Width = 503
        Height = 227
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        object Image2: TImage
          Left = 0
          Top = 0
          Width = 160
          Height = 227
          Align = alLeft
        end
        object PanelFinished: TPanel
          Left = 160
          Top = 0
          Width = 343
          Height = 227
          Align = alClient
          BevelOuter = bvNone
          Color = clWindow
          TabOrder = 0
          DesignSize = (
            343
            227)
          object Label20: TLabel
            Left = 16
            Top = 16
            Width = 263
            Height = 41
            Anchors = [akLeft, akTop, akRight]
            AutoSize = False
            Caption = 'Completing the FotoTime Account Wizard'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -16
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold]
            ParentFont = False
            WordWrap = True
          end
          object Label21: TLabel
            Left = 16
            Top = 72
            Width = 250
            Height = 13
            Caption = 'You have successfully setup your FotoTime account.'
          end
          object Label22: TLabel
            Left = 16
            Top = 224
            Width = 151
            Height = 13
            Caption = 'To close this wizard, click Finish'
          end
          object lbFinishedMsg: TLabel
            Left = 16
            Top = 104
            Width = 293
            Height = 113
            Anchors = [akLeft, akTop, akRight]
            AutoSize = False
            Caption = 'lbFinishedMsg'
            WordWrap = True
          end
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsIntroExist'
      object Panel11: TPanel
        Left = 0
        Top = 0
        Width = 503
        Height = 227
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        object Image3: TImage
          Left = 0
          Top = 0
          Width = 160
          Height = 227
          Align = alLeft
        end
        object Panel12: TPanel
          Left = 160
          Top = 0
          Width = 343
          Height = 227
          Align = alClient
          BevelOuter = bvNone
          Color = clWindow
          TabOrder = 0
          DesignSize = (
            343
            227)
          object Label23: TLabel
            Left = 16
            Top = 11
            Width = 315
            Height = 46
            Anchors = [akLeft, akTop, akRight]
            AutoSize = False
            Caption = 'Welcome to the Account Wizard'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -16
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold]
            ParentFont = False
            WordWrap = True
          end
          object lbCurAccount: TLabel
            Left = 16
            Top = 90
            Width = 137
            Height = 13
            AutoSize = False
            Caption = 'Current FotoTime Account:'
            WordWrap = True
          end
          object Label24: TLabel
            Left = 16
            Top = 41
            Width = 311
            Height = 48
            Anchors = [akLeft, akTop, akRight]
            AutoSize = False
            Caption =
              'The account wizard helps you setup your FotoTime account.  Using' +
              ' this wizard you can change account information or switch accoun' +
              'ts.'
            WordWrap = True
          end
          object lbCurEmail: TLabel
            Left = 43
            Top = 107
            Width = 60
            Height = 13
            Caption = 'lbCurEmail'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold]
            ParentFont = False
          end
          object rbChange: TRadioButton
            Left = 18
            Top = 158
            Width = 292
            Height = 17
            Caption = 'I want to change my account (e-mail, name, etc.)'
            TabOrder = 0
          end
          object rbSwitch: TRadioButton
            Left = 18
            Top = 178
            Width = 288
            Height = 17
            Caption = 'I want to change which account I'#39'm associated with'
            TabOrder = 1
          end
          object rbViewStatus: TRadioButton
            Left = 18
            Top = 138
            Width = 290
            Height = 17
            Caption = 'I want to view my account status or start evaluations'
            Checked = True
            TabOrder = 2
            TabStop = True
            OnClick = rbViewStatusClick
          end
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsSwitch'
      object Panel14: TPanel
        Left = 0
        Top = 0
        Width = 503
        Height = 227
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        DesignSize = (
          503
          227)
        object Label14: TLabel
          Left = 40
          Top = 24
          Width = 391
          Height = 26
          Anchors = [akLeft, akTop, akRight]
          Caption =
            'To change the account FotoAlbum syncs to, choose one of the opti' +
            'ons below and click the next button.'
          WordWrap = True
        end
        object rbSwitchExist: TRadioButton
          Left = 80
          Top = 72
          Width = 353
          Height = 17
          Caption = 'I want to switch to an existing FotoTime account'
          Checked = True
          TabOrder = 0
          TabStop = True
        end
        object rbSwitchNew: TRadioButton
          Left = 80
          Top = 112
          Width = 353
          Height = 17
          Caption = 'I want to create a new FotoTime account and switch'
          TabOrder = 1
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsModifyChoice'
      object PanelModifyChoice: TPanel
        Left = 0
        Top = 0
        Width = 503
        Height = 227
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        object Label26: TLabel
          Left = 42
          Top = 24
          Width = 383
          Height = 13
          Caption =
            'Choose what account information you want to change, and click th' +
            'e Next button.'
        end
        object lbModifyChoiceStatus: TLabel
          Left = 56
          Top = 208
          Width = 102
          Height = 13
          Caption = 'lbModifyChoiceStatus'
        end
        object RbModifyPassword: TRadioButton
          Left = 83
          Top = 112
          Width = 305
          Height = 17
          Caption = 'I want to change my password'
          TabOrder = 0
        end
        object RbModifyEmail: TRadioButton
          Left = 83
          Top = 64
          Width = 305
          Height = 17
          Caption = 'I want to change my email address'
          Checked = True
          TabOrder = 1
          TabStop = True
        end
        object RbModifyPersonal: TRadioButton
          Left = 83
          Top = 88
          Width = 353
          Height = 17
          Caption = 'I want to change my personal information (name)'
          TabOrder = 2
        end
        object rbModifyActivationId: TRadioButton
          Left = 84
          Top = 136
          Width = 317
          Height = 17
          Caption = 'I want to enter/change an activation ID'
          TabOrder = 3
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsModifyPersonal'
      object PanelModifyPersonal: TPanel
        Left = 0
        Top = 0
        Width = 503
        Height = 227
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        DesignSize = (
          503
          227)
        object Label18: TLabel
          Left = 56
          Top = 16
          Width = 332
          Height = 13
          Caption =
            'Change your personal information below, then click the Update bu' +
            'tton.'
        end
        object Label19: TLabel
          Left = 88
          Top = 53
          Width = 50
          Height = 13
          Caption = 'First Name'
        end
        object Label27: TLabel
          Left = 88
          Top = 85
          Width = 51
          Height = 13
          Caption = 'Last Name'
        end
        object lbModifyPersonalStatus: TLabel
          Left = 56
          Top = 209
          Width = 110
          Height = 13
          Anchors = [akLeft, akBottom]
          Caption = 'lbModifyPersonalStatus'
        end
        object EditModifyFirstName: TEdit
          Left = 152
          Top = 48
          Width = 201
          Height = 21
          TabOrder = 0
        end
        object EditModifyLastName: TEdit
          Left = 152
          Top = 80
          Width = 201
          Height = 21
          TabOrder = 1
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsModifyPassword'
      object PanelModifyPassword: TPanel
        Left = 0
        Top = 0
        Width = 503
        Height = 227
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        object Label30: TLabel
          Left = 88
          Top = 64
          Width = 71
          Height = 13
          Caption = 'New Password'
        end
        object Label28: TLabel
          Left = 32
          Top = 16
          Width = 260
          Height = 13
          Caption = 'Enter your new password, then click the Update button'
        end
        object Label31: TLabel
          Left = 50
          Top = 91
          Width = 109
          Height = 13
          Caption = 'Confirm New Password'
        end
        object lbModifyPasswordStatus: TLabel
          Left = 48
          Top = 224
          Width = 115
          Height = 13
          Caption = 'lbModifyPasswordStatus'
        end
        object EditNewPassword: TEdit
          Left = 174
          Top = 60
          Width = 141
          Height = 21
          PasswordChar = '*'
          TabOrder = 0
        end
        object EditConfirmPassword: TEdit
          Left = 174
          Top = 88
          Width = 141
          Height = 21
          PasswordChar = '*'
          TabOrder = 1
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsError'
      object PanelError: TPanel
        Left = 0
        Top = 0
        Width = 503
        Height = 227
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        DesignSize = (
          503
          227)
        object MemoError: TMemo
          Left = 11
          Top = 8
          Width = 478
          Height = 184
          Anchors = [akLeft, akTop, akRight, akBottom]
          TabOrder = 0
        end
        object BtnServer: TButton
          Left = 17
          Top = 196
          Width = 75
          Height = 25
          Anchors = [akLeft, akBottom]
          Caption = 'BtnServer'
          TabOrder = 1
          OnClick = BtnServerClick
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsNotActivated'
      object PanelNotActivated: TPanel
        Left = 0
        Top = 0
        Width = 503
        Height = 227
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        object Label33: TLabel
          Left = 40
          Top = 21
          Width = 317
          Height = 13
          Caption =
            'You must respond to an e-mail that is sent to activate your acco' +
            'unt.'
        end
        object Label29: TLabel
          Left = 40
          Top = 40
          Width = 72
          Height = 13
          Caption = 'You can either:'
        end
        object rbChangeEmail: TRadioButton
          Left = 80
          Top = 101
          Width = 409
          Height = 17
          Caption = 'Change your e-mail address (sends welcome message to new e-mail)'
          TabOrder = 0
        end
        object rbResendWelcome: TRadioButton
          Left = 80
          Top = 72
          Width = 353
          Height = 17
          Caption =
            'Have another welcome e-mail message sent (that you must reply to' +
            ')'
          Checked = True
          TabOrder = 1
          TabStop = True
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsActivateId'
      object PanelActivateId: TPanel
        Left = 0
        Top = 0
        Width = 503
        Height = 227
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        object Label34: TLabel
          Left = 40
          Top = 40
          Width = 297
          Height = 13
          Caption = 'Enter the Activation ID you received with the CD or from e-mail.'
        end
        object Label35: TLabel
          Left = 54
          Top = 92
          Width = 61
          Height = 13
          Caption = 'Activation ID'
        end
        object BtnPaste: TButton
          Left = 361
          Top = 86
          Width = 75
          Height = 25
          Caption = 'Paste'
          TabOrder = 4
          OnClick = BtnPasteClick
        end
        object ID1: TEdit
          Left = 128
          Top = 88
          Width = 51
          Height = 21
          CharCase = ecUpperCase
          MaxLength = 5
          TabOrder = 0
          OnEnter = ID1Enter
          OnKeyUp = ID1KeyUp
        end
        object ID2: TEdit
          Left = 184
          Top = 88
          Width = 51
          Height = 21
          CharCase = ecUpperCase
          MaxLength = 5
          TabOrder = 1
          OnEnter = ID1Enter
          OnKeyUp = ID1KeyUp
        end
        object ID3: TEdit
          Left = 240
          Top = 88
          Width = 51
          Height = 21
          CharCase = ecUpperCase
          MaxLength = 5
          TabOrder = 2
          OnEnter = ID1Enter
          OnKeyUp = ID1KeyUp
        end
        object ID4: TEdit
          Left = 296
          Top = 88
          Width = 51
          Height = 21
          CharCase = ecUpperCase
          MaxLength = 5
          TabOrder = 3
          OnEnter = ID1Enter
          OnKeyUp = ID1KeyUp
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsAcctStatus'
      object Panel5: TPanel
        Left = 0
        Top = 0
        Width = 503
        Height = 227
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        DesignSize = (
          503
          227)
        object LblAcctStatusTxnStatus: TLabel
          Left = 5
          Top = 210
          Width = 495
          Height = 13
          Alignment = taCenter
          Anchors = [akLeft, akRight, akBottom]
          AutoSize = False
          Caption = 'LblAcctStatusTxnStatus'
        end
        object Panel8: TPanel
          Left = 397
          Top = 33
          Width = 490
          Height = 72
          Anchors = [akLeft, akTop, akRight]
          BevelOuter = bvLowered
          TabOrder = 0
          Visible = False
          object LblFAPro: TLabel
            Left = 7
            Top = 8
            Width = 133
            Height = 13
            Cursor = crHandPoint
            Caption = 'FotoAlbum Professional'
            Color = clBtnFace
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlue
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold, fsUnderline]
            ParentColor = False
            ParentFont = False
            OnClick = LblFAProClick
          end
          object LblActivationIdMsg: TLabel
            Left = 20
            Top = 27
            Width = 70
            Height = 13
            Caption = 'Activation Msg'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
          end
          object BtnEvalFAPro: TSpeedButton
            Left = 444
            Top = -7
            Width = 100
            Height = 23
            Caption = 'Free Evaluation'
            Visible = False
            OnClick = BtnEvalFAProClick
          end
          object BtnEnterActivationId: TSpeedButton
            Left = 372
            Top = 41
            Width = 100
            Height = 23
            Caption = 'Enter Activation ID'
            OnClick = BtnEnterActivationIdClick
          end
          object BtnBuyFAPro: TSpeedButton
            Left = 372
            Top = 13
            Width = 100
            Height = 23
            Caption = 'Buy Now !'
            OnClick = BtnBuyFAProClick
          end
          object LblActivationId: TLabel
            Left = 20
            Top = 47
            Width = 62
            Height = 13
            Caption = 'Activation_Id'
          end
        end
        object Panel9: TPanel
          Left = 7
          Top = 60
          Width = 490
          Height = 168
          Anchors = [akLeft, akTop, akRight]
          BevelOuter = bvLowered
          TabOrder = 1
          object LblFtimePics: TLabel
            Left = 7
            Top = 9
            Width = 130
            Height = 13
            Cursor = crHandPoint
            Caption = 'FotoTime Web Sharing'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlue
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold, fsUnderline]
            ParentFont = False
            OnClick = LblFtimePicsClick
          end
          object LblSubscriberInfo: TLabel
            Left = 158
            Top = 9
            Width = 182
            Height = 13
            Caption = 'Subscribed (Renewal Date=7/1/2003)'
          end
          object btnRenewAcct: TSpeedButton
            Left = 374
            Top = 13
            Width = 100
            Height = 23
            Caption = 'Renew/Increase/Buy'
            OnClick = btnRenewAcctClick
          end
          object LabelSpaceUsed: TLabel
            Left = 20
            Top = 34
            Width = 57
            Height = 13
            Caption = 'Space used'
          end
          object LabelBandwidthUsed: TLabel
            Left = 20
            Top = 55
            Width = 76
            Height = 13
            Caption = 'Bandwidth used'
          end
          object LblSubBandwidthUsed: TLabel
            Left = 206
            Top = 55
            Width = 66
            Height = 13
            Caption = '500/1500 MB'
          end
          object LblSubSpaceUsed: TLabel
            Left = 206
            Top = 34
            Width = 60
            Height = 13
            Caption = '200/250 MB'
          end
          object BtnEvalWebAcct: TSpeedButton
            Left = 374
            Top = 47
            Width = 100
            Height = 23
            Caption = 'Free Evaluation'
            OnClick = BtnEvalWebAcctClick
          end
          object Bevel4: TBevel
            Left = 4
            Top = 85
            Width = 491
            Height = 4
            Shape = bsBottomLine
          end
          object LblFtimeVideo: TLabel
            Left = 7
            Top = 97
            Width = 136
            Height = 13
            Cursor = crHandPoint
            Caption = 'FotoTime Video Sharing'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clBlue
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold, fsUnderline]
            ParentFont = False
            OnClick = LblFtimeVideoClick
          end
          object LblVideoInfo: TLabel
            Left = 20
            Top = 117
            Width = 157
            Height = 13
            Caption = 'Evaluation (Expires on 7/1/2003)'
          end
          object BtnBuySubVideo: TSpeedButton
            Left = 374
            Top = 99
            Width = 100
            Height = 23
            Caption = 'Buy Now !'
            OnClick = BtnBuySubVideoClick
          end
          object pbSubSpaceUsed: TProgressBar
            Left = 102
            Top = 33
            Width = 98
            Height = 16
            Max = 250
            Position = 200
            Smooth = True
            TabOrder = 0
          end
          object pbSubBandwidthUsed: TProgressBar
            Left = 102
            Top = 55
            Width = 98
            Height = 16
            Max = 1500
            Position = 500
            Smooth = True
            TabOrder = 1
          end
          object BtnEvalVideo: TButton
            Left = 374
            Top = 132
            Width = 100
            Height = 23
            Caption = 'Free Evaluation'
            TabOrder = 2
            OnClick = BtnEvalVideoClick
          end
        end
        object Panel13: TPanel
          Left = 0
          Top = 0
          Width = 503
          Height = 41
          Align = alTop
          BevelOuter = bvNone
          Color = clWindow
          TabOrder = 2
          object Label49: TLabel
            Left = 12
            Top = 4
            Width = 52
            Height = 13
            Caption = 'Account:'
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = [fsBold]
            ParentFont = False
          end
          object Bevel3: TBevel
            Left = 0
            Top = 39
            Width = 503
            Height = 2
            Align = alBottom
          end
          object LblStatEmail: TLabel
            Left = 72
            Top = 5
            Width = 124
            Height = 13
            Caption = 'Retrieving account status.'
          end
          object LblStatUserName: TLabel
            Left = 72
            Top = 20
            Width = 63
            Height = 13
            Caption = 'Please wait...'
          end
          object btnChgAcct: TButton
            Left = 393
            Top = 8
            Width = 100
            Height = 23
            Caption = 'Edit Account'
            TabOrder = 0
            Visible = False
            OnClick = btnChgAcctClick
          end
        end
        object PanelWait: TPanel
          Left = 72
          Top = 200
          Width = 193
          Height = 65
          BevelOuter = bvNone
          TabOrder = 3
          DesignSize = (
            193
            65)
          object LblWaitMsg: TLabel
            Left = 1
            Top = 32
            Width = 191
            Height = 25
            Alignment = taCenter
            Anchors = [akLeft, akTop, akRight]
            AutoSize = False
            Caption = 'Retrieving account status ...'
          end
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'tsWebTxn'
      object Panel15: TPanel
        Left = 0
        Top = 0
        Width = 503
        Height = 227
        Align = alClient
        BevelOuter = bvNone
        TabOrder = 0
        DesignSize = (
          503
          227)
        object LblWebTxnMsg: TLabel
          Left = 1
          Top = 105
          Width = 500
          Height = 13
          Alignment = taCenter
          Anchors = [akLeft, akTop, akRight]
          AutoSize = False
          Caption = 'Set LblWebTxnMsg.Caption to use this'
        end
        object pbWebTxn: TProgressBar
          Left = 128
          Top = 81
          Width = 244
          Height = 16
          Anchors = [akLeft, akTop, akRight]
          Smooth = True
          TabOrder = 0
        end
      end
    end
  end
  object PanelHdg: TPanel
    Left = 0
    Top = 0
    Width = 503
    Height = 49
    Align = alTop
    BevelOuter = bvNone
    Color = clWindow
    TabOrder = 2
    Visible = False
    object Bevel2: TBevel
      Left = 0
      Top = 47
      Width = 503
      Height = 2
      Align = alBottom
    end
    object lbHdg: TLabel
      Left = 43
      Top = 8
      Width = 325
      Height = 13
      Caption = 'Set lbHdg.Caption to change this message for each page'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object TimerGetStatus: TTimer
    Enabled = False
    Interval = 100
    OnTimer = TimerGetStatusTimer
    Left = 304
    Top = 24
  end
end