Swift Draw/SwiftDraw.iso/Cosmi/Register.exe/0/RCDATA/TREGISTERFORM/TREGISTERFORM.txt

Text File | 1999-10-11 | 9KB | 439 lines

object RegisterForm: TRegisterForm
  Left = 376
  Top = 159
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Registration Information'
  ClientHeight = 489
  ClientWidth = 538
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object TLabel
    Left = 65
    Top = 35
    Width = 31
    Height = 13
    Alignment = taRightJustify
    Caption = '&Name:'
    FocusControl = EName
  end
  object TLabel
    Left = 46
    Top = 59
    Width = 50
    Height = 13
    Alignment = taRightJustify
    Caption = 'Address &1:'
    FocusControl = EAddress1
  end
  object TLabel
    Left = 46
    Top = 83
    Width = 50
    Height = 13
    Alignment = taRightJustify
    Caption = 'Address &2:'
    FocusControl = EAddress2
  end
  object TLabel
    Left = 76
    Top = 107
    Width = 20
    Height = 13
    Alignment = taRightJustify
    Caption = 'C&ity:'
    FocusControl = ECity
  end
  object TLabel
    Left = 197
    Top = 107
    Width = 75
    Height = 13
    Alignment = taRightJustify
    Caption = '&State/Province:'
    FocusControl = EState
  end
  object TLabel
    Left = 324
    Top = 107
    Width = 60
    Height = 13
    Alignment = taRightJustify
    Caption = 'Posta&l Code:'
    FocusControl = EPostalCode
  end
  object TLabel
    Left = 57
    Top = 131
    Width = 39
    Height = 13
    Alignment = taRightJustify
    Caption = 'C&ountry:'
    FocusControl = ECountry
  end
  object TLabel
    Left = 74
    Top = 155
    Width = 22
    Height = 13
    Alignment = taRightJustify
    Caption = '&Age:'
    FocusControl = EAge
  end
  object TLabel
    Left = 62
    Top = 219
    Width = 34
    Height = 13
    Alignment = taRightJustify
    Caption = 'P&hone:'
    FocusControl = EPhone
  end
  object TLabel
    Left = 65
    Top = 243
    Width = 31
    Height = 13
    Alignment = taRightJustify
    Caption = '&E-mail:'
    FocusControl = EEMail
  end
  object TLabel
    Left = 8
    Top = 267
    Width = 88
    Height = 13
    Alignment = taRightJustify
    Caption = '&Where purchased:'
    FocusControl = CPurchased
  end
  object TLabel
    Left = 281
    Top = 219
    Width = 79
    Height = 13
    Alignment = taRightJustify
    Caption = 'Date pu&rchased:'
    FocusControl = EDate
  end
  object TLabel
    Left = 44
    Top = 315
    Width = 52
    Height = 13
    Alignment = taRightJustify
    Caption = '&Comments:'
    FocusControl = MComments
  end
  object LProduct: TLabel
    Left = 56
    Top = 11
    Width = 40
    Height = 13
    Alignment = taRightJustify
    Caption = 'Prod&uct:'
    FocusControl = EProduct
  end
  object TLabel
    Left = 285
    Top = 243
    Width = 75
    Height = 13
    Alignment = taRightJustify
    Caption = 'Computer T&ype:'
    FocusControl = EComputerType
  end
  object TLabel
    Left = 274
    Top = 267
    Width = 86
    Height = 13
    Alignment = taRightJustify
    Caption = 'Operatin&g System:'
    FocusControl = EOS
  end
  object TLabel
    Left = 333
    Top = 291
    Width = 27
    Height = 13
    Alignment = taRightJustify
    Caption = 'RA&M:'
    FocusControl = ERAM
  end
  object LEStoreType: TLabel
    Left = 43
    Top = 291
    Width = 55
    Height = 13
    Alignment = taRightJustify
    Caption = 'S&tore Type:'
    Enabled = False
    FocusControl = EStoreType
  end
  object EName: TEdit
    Left = 100
    Top = 32
    Width = 168
    Height = 21
    TabOrder = 1
  end
  object EAddress1: TEdit
    Left = 100
    Top = 56
    Width = 168
    Height = 21
    TabOrder = 2
  end
  object EAddress2: TEdit
    Left = 100
    Top = 80
    Width = 168
    Height = 21
    TabOrder = 3
  end
  object ECity: TEdit
    Left = 100
    Top = 104
    Width = 88
    Height = 21
    TabOrder = 4
  end
  object EState: TEdit
    Left = 276
    Top = 104
    Width = 40
    Height = 21
    CharCase = ecUpperCase
    TabOrder = 5
  end
  object EPostalCode: TEdit
    Left = 388
    Top = 104
    Width = 64
    Height = 21
    TabOrder = 6
  end
  object ECountry: TEdit
    Left = 100
    Top = 128
    Width = 168
    Height = 21
    TabOrder = 7
  end
  object EAge: TEdit
    Left = 100
    Top = 152
    Width = 168
    Height = 21
    TabOrder = 8
  end
  object EPhone: TEdit
    Left = 100
    Top = 216
    Width = 168
    Height = 21
    TabOrder = 10
  end
  object EEMail: TEdit
    Left = 100
    Top = 240
    Width = 168
    Height = 21
    TabOrder = 11
  end
  object RSex: TRadioGroup
    Left = 67
    Top = 176
    Width = 305
    Height = 33
    Caption = 'Se&x:'
    Columns = 3
    ItemIndex = 2
    Items.Strings = (
      'Male'
      'Female'
      'Decline to state')
    TabOrder = 9
  end
  object CPurchased: TComboBox
    Left = 100
    Top = 264
    Width = 168
    Height = 21
    ItemHeight = 13
    Items.Strings = (
      'Best Buy'
      'BJ'#39's Wholesale Club'
      'Bradlee'#39's'
      'CompUSA'
      'Cosmi Web Site'
      'Eckerd'#39's'
      'Electronics Boutique'
      'Fred Meyer'
      'K-Mart'
      'Office Depot'
      'Office Max'
      'Price-Costco'
      'Radio Shack'
      'Sam'#39's Club'
      'Software Etc.'
      'Staples'
      'Walmart')
    TabOrder = 12
    OnChange = CPurchasedChange
  end
  object BPrint: TBitBtn
    Left = 117
    Top = 416
    Width = 130
    Height = 65
    Caption = '&Print Registration...'
    Default = True
    ModalResult = 1
    TabOrder = 19
    OnClick = BPrintClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
      0003377777777777777308888888888888807F33333333333337088888888888
      88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
      8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
      8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
      03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
      03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
      33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
      33333337FFFF7733333333300000033333333337777773333333}
    NumGlyphs = 2
    Spacing = 10
  end
  object EDate: TOvcDateEdit
    Left = 364
    Top = 216
    Width = 168
    Height = 21
    AllowIncDec = True
    ButtonGlyph.Data = {
      3E010000424D3E0100000000000036000000280000000B0000000B0000000100
      1000000000000801000000000000000000000000000000000000E03D00000000
      0000000000000000000000000000E03D00000000F75EF75EEF3DF75EF75EEF3D
      F75EF75EF75E000000F00000007CF75EEF3D007CF75EEF3D007CF75EF75E0000
      D7020000EF3DEF3DEF3DEF3DEF3DEF3DEF3DEF3DEF3D000083030000F75EF75E
      EF3DF75EF75EEF3DF75EF75EF75E000051020000007CF75EEF3D007CF75EEF3D
      007CF75EF75E000083030000EF3DEF3DEF3DEF3DEF3DEF3DEF3DEF3DEF3D0000
      64000000F75EF75EEF3DF75EF75EEF3DF75EF75EF75E000005000000007CF75E
      EF3D007CF75EEF3D007CF75EF75E000004000000000000000000000000000000
      00000000000000005A04E03D1F001F00EF3DEF3DEF3DEF3DEF3D1F001F00E03D
      C102}
    Controller = OvcController
    Epoch = 1980
    ForceCentury = False
    LabelInfo.Visible = False
    PopupAnchor = paLeft
    PopupColors.ActiveDay = clRed
    PopupColors.ColorScheme = cscalCustom
    PopupColors.DayNames = clMaroon
    PopupColors.Days = clBlack
    PopupColors.InactiveDays = clGray
    PopupColors.MonthAndYear = clBlue
    PopupColors.Weekend = clRed
    PopupDateFormat = dfLong
    PopupDayNameWidth = 3
    PopupFont.Charset = DEFAULT_CHARSET
    PopupFont.Color = clWindowText
    PopupFont.Height = -11
    PopupFont.Name = 'MS Sans Serif'
    PopupFont.Style = []
    PopupHeight = 140
    PopupOptions = [cdoShortNames, cdoShowYear, cdoShowInactive, cdoShowRevert, cdoShowToday, cdoShowNavBtns]
    PopupWidth = 200
    PopupWeekStarts = dtSunday
    ReadOnly = False
    RequiredFields = [rfYear, rfMonth, rfDay]
    ShowButton = False
    TabOrder = 14
    TodayString = '/'
  end
  object MComments: TMemo
    Left = 100
    Top = 312
    Width = 432
    Height = 89
    TabOrder = 18
  end
  object EProduct: TEdit
    Left = 100
    Top = 8
    Width = 168
    Height = 21
    TabOrder = 0
  end
  object BDontRegister: TBitBtn
    Left = 291
    Top = 416
    Width = 130
    Height = 65
    Caption = '&Don'#39't Register'
    TabOrder = 20
    Kind = bkCancel
    Spacing = 10
  end
  object EComputerType: TEdit
    Left = 364
    Top = 240
    Width = 168
    Height = 21
    TabOrder = 15
  end
  object EOS: TEdit
    Left = 364
    Top = 264
    Width = 168
    Height = 21
    TabOrder = 16
  end
  object ERAM: TEdit
    Left = 364
    Top = 288
    Width = 168
    Height = 21
    TabOrder = 17
  end
  object EStoreType: TEdit
    Left = 100
    Top = 288
    Width = 168
    Height = 21
    Enabled = False
    TabOrder = 13
  end
  object OvcController: TOvcController
    EntryCommands.TableList = (
      'Default'
      True
      ()
      'WordStar'
      False
      ()
      'Grid'
      False
      ())
    EntryOptions = [efoAutoSelect, efoBeepOnError, efoInsertPushes]
    Epoch = 1900
    Left = 411
    Top = 8
  end
end