object frmUpgrad: TfrmUpgrad Left = 57 Top = 125 Width = 578 Height = 458 BorderIcons = [biSystemMenu, biMaximize] Caption = 'Upgrade' Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} Position = poScreenCenter OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object LabelEffect1: TLabelEffect Left = 6 Top = 10 Width = 291 Height = 33 ColourHighlight = clAqua ColourShadow = clNavy GraduateFrom = clWindowText ColourScheme = csSteel Caption = 'Upgrade To CyberContact Pro' Font.Color = clTeal Font.Height = -21 Font.Name = 'Times New Roman' Font.Style = [] ParentFont = False end object BitBtn1: TBitBtn Left = 454 Top = 40 Width = 109 Height = 25 Caption = '&Order Form' Font.Color = clMaroon Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnClick = BitBtn1Click end object BitBtn2: TBitBtn Left = 454 Top = 123 Width = 109 Height = 25 Caption = '&Enter Code' Font.Color = clBlue Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnClick = BitBtn2Click end object BitBtn3: TBitBtn Left = 454 Top = 81 Width = 109 Height = 25 Caption = 'O&n Line Upgrade' Font.Color = clTeal Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnClick = BitBtn3Click end object BitBtn4: TBitBtn Left = 454 Top = 164 Width = 109 Height = 25 Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentFont = False TabOrder = 3 Kind = bkClose end object Memo1: TMemo Left = 6 Top = 40 Width = 435 Height = 381 Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] Lines.Strings = ( 'Memo1') ParentFont = False ReadOnly = True ScrollBars = ssVertical TabOrder = 4 end end