Chip 2001 August/Chip_2001-08_cd2.bin/kancelar/busicard/BCDP2000.EXE/bcdp.exe/0/RCDATA/TREGWIZFORM/TREGWIZFORM.txt

Text File | 2000-10-20 | 22.9 KB | 850 lines

object RegWizForm: TRegWizForm
  Left = 332
  Top = 139
  HelpContext = 20000
  BorderIcons = [biSystemMenu]
  BorderStyle = bsDialog
  Caption = 'Registration Wizard'
  ClientHeight = 345
  ClientWidth = 464
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poOwnerFormCenter
  ShowHint = True
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label25: TLabel
    Left = 192
    Top = 56
    Width = 53
    Height = 13
    Caption = 'First Name:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
  end
  object PageControl: TPageControl
    Left = 0
    Top = 0
    Width = 464
    Height = 293
    ActivePage = TabSheet1
    Align = alTop
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = 'TabSheet1'
      TabVisible = False
      object Label2: TLabel
        Left = 116
        Top = 252
        Width = 138
        Height = 13
        Caption = 'Click Next below to continue.'
      end
      object Label3: TLabel
        Left = 116
        Top = 160
        Width = 195
        Height = 13
        Caption = 'How would you like to pay for your order?'
      end
      object Label32: TLabel
        Left = 116
        Top = 12
        Width = 209
        Height = 13
        Caption = 'Welcome to the Registration Wizard!'
        Color = clBtnFace
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
      end
      object Image3: TImage
        Left = 4
        Top = 5
        Width = 101
        Height = 273
        AutoSize = True
        Picture.Data = {<image000.bmp>}
      end
      object Label35: TLabel
        Left = 116
        Top = 44
        Width = 329
        Height = 53
        AutoSize = False
        Caption =
          'Thank you for deciding to register this product.  We have worked' +
          ' very hard to make it a great product based on your suggestions ' +
          'and comments.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        WordWrap = True
      end
      object Label36: TLabel
        Left = 116
        Top = 100
        Width = 329
        Height = 53
        AutoSize = False
        Caption =
          'If you are already a registered user and are upgrading to a new ' +
          'major release, please continue on to purchase an upgrade.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        WordWrap = True
      end
      object CCRadio: TRadioButton
        Left = 124
        Top = 184
        Width = 250
        Height = 17
        Caption = 'C&redit Card'
        Checked = True
        TabOrder = 0
        TabStop = True
      end
      object CCMRadio: TRadioButton
        Left = 124
        Top = 208
        Width = 250
        Height = 17
        Caption = '&Check or Money Order (US $)'
        TabOrder = 1
      end
    end
    object TabSheet2: TTabSheet
      Caption = 'TabSheet2'
      TabVisible = False
      object Label4: TLabel
        Left = 12
        Top = 170
        Width = 242
        Height = 13
        Caption = 'How would you like to place your credit card order?'
      end
      object Label5: TLabel
        Left = 12
        Top = 252
        Width = 138
        Height = 13
        Caption = 'Click Next below to continue.'
      end
      object Label24: TLabel
        Left = 12
        Top = 68
        Width = 433
        Height = 33
        AutoSize = False
        Caption =
          'All methods of ordering by credit card below are completely secu' +
          're.  Great care has been taken to be sure your credit card infor' +
          'mation is safe.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        WordWrap = True
      end
      object Image1: TImage
        Left = 76
        Top = 4
        Width = 304
        Height = 52
        AutoSize = True
        Picture.Data = {<image001.bmp>}
      end
      object Label27: TLabel
        Left = 12
        Top = 100
        Width = 433
        Height = 61
        AutoSize = False
        Caption =
          'If you are not comfortable with entering your credit card inform' +
          'ation online, choose the Phone or FAX option below.  If you cann' +
          'ot connect to the Internet click the Back button and choose to o' +
          'rder by check or money order.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        WordWrap = True
      end
      object InternetRadio: TRadioButton
        Left = 16
        Top = 198
        Width = 300
        Height = 17
        Caption = 'On the Internet (Secure on-line order form)'
        Checked = True
        TabOrder = 0
        TabStop = True
      end
      object FAXRadio: TRadioButton
        Left = 16
        Top = 222
        Width = 300
        Height = 17
        Caption = 'By Phone or FAX'
        TabOrder = 1
      end
    end
    object TabSheet3: TTabSheet
      Caption = 'TabSheet3'
      TabVisible = False
      object Label6: TLabel
        Left = 144
        Top = 208
        Width = 208
        Height = 13
        Caption = 'Click the link below to go to our online store.'
      end
      object OrderURLLabel: TURLLabel
        Left = 144
        Top = 232
        Width = 74
        Height = 13
        Cursor = crHandPoint
        Caption = 'OrderURLLabel'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlue
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsUnderline]
        ParentFont = False
        OnClick = OrderURLLabelClick
      end
      object Image2: TImage
        Left = 8
        Top = 24
        Width = 124
        Height = 229
        AutoSize = True
        Picture.Data = {<image002.bmp>}
      end
      object Label1: TLabel
        Left = 144
        Top = 36
        Width = 301
        Height = 41
        AutoSize = False
        Caption =
          'Our online store allows you to purchase our products by secure s' +
          'erver, phone or FAX with your credit card.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        WordWrap = True
      end
      object Label34: TLabel
        Left = 144
        Top = 83
        Width = 301
        Height = 49
        AutoSize = False
        Caption =
          'For phone and FAX orders you enter your order information online' +
          ' then phone or FAX your credit card information to complete the ' +
          'order.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        WordWrap = True
      end
      object Label33: TLabel
        Left = 144
        Top = 136
        Width = 301
        Height = 65
        AutoSize = False
        Caption =
          'Although ordering online with your credit card is completely sec' +
          'ure, we offer this option for those who are no comfortable with ' +
          'entering credit card information online.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        WordWrap = True
      end
    end
    object TabSheet4: TTabSheet
      Caption = 'TabSheet4'
      TabVisible = False
      object Label22: TLabel
        Left = 16
        Top = 244
        Width = 423
        Height = 26
        Caption =
          'A license is required for each workstation computer the software' +
          ' is installed on.  If installed on a server a license is require' +
          'd for each person using the software on the network.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        WordWrap = True
      end
      object TotalLabel: TLabel
        Left = 348
        Top = 224
        Width = 97
        Height = 13
        Alignment = taRightJustify
        AutoSize = False
        Caption = '$0.00'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label23: TLabel
        Left = 336
        Top = 224
        Width = 34
        Height = 13
        Caption = 'Total:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object NoDiskLabel: TLabel
        Left = 8
        Top = 200
        Width = 441
        Height = 17
        Alignment = taCenter
        AutoSize = False
        Caption =
          'Hard copies are not available. All products are available on our' +
          ' web site for free download.'
        WordWrap = True
      end
      object RegRadioGroup: TRadioGroup
        Left = 4
        Top = 140
        Width = 445
        Height = 53
        Caption = 'Registration Code'
        ItemIndex = 0
        Items.Strings = (
          'Send my registration information by e-mail'
          'Send my registration information by postal mail')
        TabOrder = 1
      end
      object GroupBox3: TGroupBox
        Left = 4
        Top = 4
        Width = 445
        Height = 133
        Caption = 'Licenses'
        TabOrder = 0
        object Label13: TLabel
          Left = 340
          Top = 20
          Width = 42
          Height = 13
          Caption = 'Quantity:'
        end
        object Label30: TLabel
          Left = 26
          Top = 115
          Width = 393
          Height = 13
          Alignment = taCenter
          AutoSize = False
          Caption = 'For larger quantities or special requirements please contact us.'
          Color = clBtnFace
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlue
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentColor = False
          ParentFont = False
        end
        object Label31: TLabel
          Left = 26
          Top = 97
          Width = 393
          Height = 13
          Alignment = taCenter
          AutoSize = False
          Caption =
            'To be eligible for the upgrade price you MUST be a registered us' +
            'er.'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object StandardRadio: TRadioButton
          Left = 16
          Top = 16
          Width = 300
          Height = 17
          Hint =
            'Use this if you are have not registered before and want to regis' +
            'ter the latest Standard version.'
          Caption = 'StandardRadio'
          Checked = True
          TabOrder = 0
          TabStop = True
          OnClick = QtyEditChange
        end
        object GoldRadio: TRadioButton
          Left = 16
          Top = 51
          Width = 300
          Height = 17
          Hint =
            'Use this if you are have not registered before and want to regis' +
            'ter the latest Gold version.'
          Caption = 'GoldRadio'
          TabOrder = 2
          OnClick = QtyEditChange
        end
        object StandardUpgradeRadio: TRadioButton
          Left = 16
          Top = 33
          Width = 300
          Height = 17
          Hint =
            'Use this to upgrade to the latest version at your current level ' +
            '(Standard or Gold)'
          Caption = 'StandardUpgradeRadio'
          TabOrder = 1
          OnClick = QtyEditChange
        end
        object QtyEdit: TEdit
          Left = 400
          Top = 16
          Width = 37
          Height = 21
          TabOrder = 4
          Text = '1'
          OnChange = QtyEditChange
        end
        object GoldUpgradeRadio: TRadioButton
          Left = 16
          Top = 68
          Width = 300
          Height = 17
          Hint =
            'Use this if you registered a standard version and wish to upgrad' +
            'e to the latest Gold version'
          Caption = 'GoldUpgradeRadio'
          TabOrder = 3
        end
      end
      object DiskCheck: TCheckBox
        Left = 8
        Top = 224
        Width = 321
        Height = 17
        Caption = 'Send me a CD copy by postal mail ($5 SH)'
        TabOrder = 2
        OnClick = QtyEditChange
      end
    end
    object TabSheet5: TTabSheet
      Caption = 'TabSheet5'
      TabVisible = False
      object GroupBox2: TGroupBox
        Left = 4
        Top = 4
        Width = 441
        Height = 249
        Caption = 'Shipping Information'
        TabOrder = 0
        object Label9: TLabel
          Left = 8
          Top = 28
          Width = 53
          Height = 13
          Caption = 'First Name:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label10: TLabel
          Left = 8
          Top = 60
          Width = 41
          Height = 13
          Caption = 'Address:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label11: TLabel
          Left = 8
          Top = 176
          Width = 34
          Height = 13
          Caption = 'Phone:'
        end
        object Label12: TLabel
          Left = 8
          Top = 148
          Width = 31
          Height = 13
          Caption = 'E-mail:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label14: TLabel
          Left = 18
          Top = 216
          Width = 405
          Height = 13
          Alignment = taCenter
          AutoSize = False
          Caption =
            'Please be sure the information above is correct before proceedin' +
            'g.'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clRed
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object Label15: TLabel
          Left = 288
          Top = 176
          Width = 39
          Height = 13
          Caption = 'Country:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label16: TLabel
          Left = 8
          Top = 116
          Width = 20
          Height = 13
          Caption = 'City:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label17: TLabel
          Left = 196
          Top = 116
          Width = 28
          Height = 13
          Caption = 'State:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label18: TLabel
          Left = 312
          Top = 116
          Width = 18
          Height = 13
          Caption = 'Zip:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object Label26: TLabel
          Left = 192
          Top = 28
          Width = 54
          Height = 13
          Caption = 'Last Name:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
        end
        object FirstNameEdit: TEdit
          Left = 64
          Top = 24
          Width = 105
          Height = 21
          TabOrder = 0
        end
        object Address1Edit: TEdit
          Left = 64
          Top = 56
          Width = 209
          Height = 21
          TabOrder = 2
        end
        object Address2Edit: TEdit
          Left = 64
          Top = 84
          Width = 209
          Height = 21
          TabOrder = 3
        end
        object CityEdit: TEdit
          Left = 64
          Top = 112
          Width = 121
          Height = 21
          TabOrder = 4
        end
        object StateEdit: TEdit
          Left = 232
          Top = 112
          Width = 65
          Height = 21
          TabOrder = 5
        end
        object ZipEdit: TEdit
          Left = 340
          Top = 112
          Width = 85
          Height = 21
          TabOrder = 6
        end
        object CountryEdit: TEdit
          Left = 340
          Top = 172
          Width = 85
          Height = 21
          TabOrder = 9
        end
        object PhoneEdit: TEdit
          Left = 64
          Top = 172
          Width = 121
          Height = 21
          TabOrder = 8
        end
        object EmailEdit: TEdit
          Left = 64
          Top = 144
          Width = 189
          Height = 21
          TabOrder = 7
        end
        object LastNameEdit: TEdit
          Left = 260
          Top = 24
          Width = 105
          Height = 21
          TabOrder = 1
        end
      end
    end
    object TabSheet6: TTabSheet
      Caption = 'TabSheet6'
      TabVisible = False
      object Label21: TLabel
        Left = 352
        Top = 8
        Width = 105
        Height = 121
        AutoSize = False
        Caption =
          'Please review the information to the left, then click the button' +
          ' below to print your order form.  If any items are incorrect cli' +
          'ck the Back button to make corrections.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clRed
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        WordWrap = True
      end
      object Label29: TLabel
        Left = 88
        Top = 126
        Width = 142
        Height = 13
        Caption = 'PRINTING...  PLEASE WAIT.'
      end
      object Label37: TLabel
        Left = 352
        Top = 120
        Width = 101
        Height = 97
        AutoSize = False
        Caption =
          'NOTE:  Your e-mail address is very important.  Please double che' +
          'ck it to make sure it is correct.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
        WordWrap = True
      end
      object PrintBtn: TBitBtn
        Left = 364
        Top = 224
        Width = 75
        Height = 25
        Caption = '&Print'
        TabOrder = 0
        OnClick = PrintBtnClick
        Glyph.Data = {
          F6000000424DF600000000000000760000002800000010000000100000000100
          04000000000080000000120B0000120B00001000000010000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF00C0C0C00000FFFF00FF000000C0C0C000FFFF0000FFFFFF00DADADADADADA
          DADAADADADAD000000ADDAD4DAD00000000AADA44DA033333000444444D00000
          0030ADA44DA0F8F8F800DAD4DAD000000870ADADADAD0FFFF00DDA00000A0F77
          F0DAAD0FFF0DA0FFFF0D00000F0ADA00000A0FFF0F0DADADADAD0F7F000ADADA
          DADA0F7F00ADADADADAD0FF00ADADADADADA0000ADADADADADAD}
      end
      object SummaryEdit: TRichEdit
        Left = 4
        Top = 4
        Width = 337
        Height = 253
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'Courier New'
        Font.Style = []
        Lines.Strings = (
          '')
        ParentFont = False
        ReadOnly = True
        ScrollBars = ssBoth
        TabOrder = 1
        WordWrap = False
      end
    end
  end
  object BackBtn: TBitBtn
    Left = 48
    Top = 304
    Width = 75
    Height = 25
    Caption = '&Back'
    Enabled = False
    TabOrder = 1
    OnClick = BackBtnClick
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      777777777777770777777777777770077777777777770C07777777777770CC07
      77777777770CCC077777777770CCCC07777777770CCCCC07777777770CCCCC07
      7777777770CCCC0777777777770CCC07777777777770CC077777777777770C07
      7777777777777007777777777777770777777777777777777777}
  end
  object NextBtn: TBitBtn
    Left = 131
    Top = 304
    Width = 75
    Height = 25
    Caption = '&Next'
    TabOrder = 2
    OnClick = NextBtnClick
    Glyph.Data = {
      F6000000424DF600000000000000760000002800000010000000100000000100
      0400000000008000000000000000000000001000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
      77777777077777777777777700777777777777770C077777777777770CC07777
      777777770CCC0777777777770CCCC077777777770CCCCC07777777770CCCCC07
      777777770CCCC077777777770CCC0777777777770CC07777777777770C077777
      7777777700777777777777770777777777777777777777777777}
    Layout = blGlyphRight
  end
  object CancelBtn: TBitBtn
    Left = 213
    Top = 304
    Width = 75
    Height = 25
    Caption = '&Cancel'
    TabOrder = 3
    OnClick = CancelBtnClick
    Kind = bkCancel
  end
  object HelpBtn: TBitBtn
    Left = 312
    Top = 304
    Width = 75
    Height = 25
    TabOrder = 4
    Kind = bkHelp
  end
  object PrinterSetupDialog: TPrinterSetupDialog
    Left = 412
    Top = 300
  end
end