home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Your Business Pak
/
BusinessPak2.iso
/
Cosmi
/
Register.exe
/
0
/
RCDATA
/
TREGISTERFORM
/
TREGISTERFORM.txt
Wrap
Text File
|
2000-11-08
|
10KB
|
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
TabOrder = 12
OnChange = CPurchasedChange
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')
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 = {
4A010000424D4A0100000000000042000000280000000B0000000B0000000100
1000030000000801000000000000000000000000000000000000007C0000E003
00001F000000E03D000000000000000000000000000000000000E03D00000000
F75EF75EEF3DF75EF75EEF3DF75EF75EF75E000000F00000007CF75EEF3D007C
F75EEF3D007CF75EF75E0000D7020000EF3DEF3DEF3DEF3DEF3DEF3DEF3DEF3D
EF3D000083030000F75EF75EEF3DF75EF75EEF3DF75EF75EF75E000051020000
007CF75EEF3D007CF75EEF3D007CF75EF75E000083030000EF3DEF3DEF3DEF3D
EF3DEF3DEF3DEF3DEF3D000064000000F75EF75EEF3DF75EF75EEF3DF75EF75E
F75E000005000000007CF75EEF3D007CF75EEF3D007CF75EF75E000004000000
00000000000000000000000000000000000000005A04E03D1F001F00EF3DEF3D
EF3DEF3DEF3D1F001F00E03DC102}
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