object Form9: TForm9
  Left = 205
  Top = 100
  HorzScrollBar.Visible = False
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = 'Time Stamping Program'
  ClientHeight = 293
  ClientWidth = 447
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  FormStyle = fsStayOnTop
  Position = poScreenCenter
  Scaled = False
  PixelsPerInch = 96
  TextHeight = 16
  object Image1: TImage
    Left = 32
    Top = 24
    Width = 32
    Height = 32
    AutoSize = True
    Picture.Data = {<image000.ico>}
    Stretch = True
  end
  object Memo1: TMemo
    Left = 106
    Top = 7
    Width = 335
    Height = 282
    Alignment = taCenter
    Color = clWhite
    Enabled = False
    Font.Color = clBlack
    Font.Height = -13
    Font.Name = 'System'
    Font.Style = []
    Lines.Strings = (
      'This "try before you buy" program is time '
      'stamped on your initial running of the program. '
      ' At the end of thirty days you will start receiving '
      'regular reminders that the program is not '
      'registered and if you continue to use the '
      'program it needs to be registered.  Registration '
      'brings many benefits including the ability to get '
      'rid of the nuisance screens about registration.'
      'Registration also ensures that you will be '
      'notified of major enhancements to the program '
      'and that those upgrades will be FREE to '
      'registered users who download the upgrade '
      'and only $5 for those needing a diskette. '
      'Continuing from this point indicates your '
      'acceptance of these terms.'
      ''
      '')
    MaxLength = -1
    ParentFont = False
    TabOrder = 0
  end
  object BitBtn1: TBitBtn
    Left = 6
    Top = 207
    Width = 89
    Height = 33
    Caption = '&Proceed'
    TabOrder = 1
    OnClick = BitBtn1Click
    Kind = bkOK
  end
  object BitBtn2: TBitBtn
    Left = 6
    Top = 247
    Width = 89
    Height = 33
    Caption = '&Cancel'
    TabOrder = 2
    OnClick = BitBtn2Click
    Kind = bkCancel
  end
  object Memo2: TMemo
    Left = 0
    Top = 93
    Width = 104
    Height = 108
    Alignment = taCenter
    Color = clBlue
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    Lines.Strings = (
      'Henning '
      'Associates'
      '1710 Allied St. #36'
      'Charlottesville, '
      'VA 22903'
      '800-823-6896')
    ParentFont = False
    TabOrder = 3
  end
end