object Form4: TForm4 Left = 366 Top = 429 BorderStyle = bsDialog Caption = 'Registration' ClientHeight = 89 ClientWidth = 254 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 16 Top = 8 Width = 225 Height = 16 Caption = 'Please enter your serial number:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [fsBold, fsUnderline] ParentFont = False end object BitBtn1: TBitBtn Left = 96 Top = 40 Width = 75 Height = 25 TabOrder = 0 OnClick = BitBtn1Click Kind = bkOK end object BitBtn2: TBitBtn Left = 176 Top = 40 Width = 75 Height = 25 TabOrder = 1 OnClick = BitBtn2Click Kind = bkCancel end object Memo1: TMemo Left = 8 Top = 40 Width = 81 Height = 25 TabOrder = 2 end object Memo2: TMemo Left = 8 Top = 72 Width = 81 Height = 17 Lines.Strings = ( '') TabOrder = 3 Visible = False end end