home *** CD-ROM | disk | FTP | other *** search
- object frmEnterKey: TfrmEnterKey
- Left = 198
- Top = 486
- BorderIcons = [biSystemMenu, biMinimize]
- BorderStyle = bsDialog
- ClientHeight = 272
- ClientWidth = 332
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Panel1: TPanel
- Left = 4
- Top = 4
- Width = 325
- Height = 233
- BevelOuter = bvLowered
- Color = 14680063
- TabOrder = 0
- object Label1: TLabel
- Left = 8
- Top = 8
- Width = 6
- Height = 13
- Caption = '1'
- Transparent = True
- end
- object Label2: TLabel
- Left = 8
- Top = 28
- Width = 256
- Height = 13
- Caption = 'Solutions (see Order Form... under the Register Menu),'
- Transparent = True
- end
- object Label3: TLabel
- Left = 8
- Top = 48
- Width = 164
- Height = 13
- Caption = 'and quote the following reference: '
- Transparent = True
- end
- object lblinregkey: TLabel
- Left = 16
- Top = 68
- Width = 154
- Height = 22
- Caption = '12Ilblinregkey'
- Font.Color = clBlack
- Font.Height = -19
- Font.Name = 'Courier New'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object Label5: TLabel
- Left = 8
- Top = 140
- Width = 270
- Height = 13
- Caption = 'You will be given a registration key. Please type it into the'
- Transparent = True
- end
- object Label6: TLabel
- Left = 8
- Top = 160
- Width = 157
- Height = 13
- Caption = 'box below, and then click on OK.'
- Transparent = True
- end
- object Image1: TImage
- Left = 8
- Top = 184
- Width = 32
- Height = 32
- AutoSize = True
- Picture.Data = {<image000.ico>}
- end
- object Label4: TLabel
- Left = 8
- Top = 92
- Width = 97
- Height = 13
- Caption = 'and the following ID:'
- Transparent = True
- end
- object lblID: TLabel
- Left = 16
- Top = 112
- Width = 297
- Height = 18
- AutoSize = False
- Caption = 'lblID'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'Courier New'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- end
- object tedregkey: TEdit
- Left = 56
- Top = 184
- Width = 197
- Height = 30
- Ctl3D = True
- Font.Color = clBlack
- Font.Height = -19
- Font.Name = 'Courier New'
- Font.Style = [fsBold]
- ParentCtl3D = False
- ParentFont = False
- TabOrder = 0
- Text = 'tedregkey'
- OnChange = tedregkeyChange
- end
- end
- object btnOK: TBitBtn
- Left = 163
- Top = 244
- Width = 77
- Height = 23
- Caption = '&OK'
- Default = True
- Enabled = False
- TabOrder = 1
- OnClick = btnOKClick
- NumGlyphs = 2
- Style = bsNew
- end
- object btnCancel: TBitBtn
- Left = 252
- Top = 244
- Width = 77
- Height = 23
- Cancel = True
- Caption = '&Cancel'
- ModalResult = 2
- TabOrder = 2
- OnClick = btnCancelClick
- Style = bsNew
- end
- end
-