object ListEv: TListEv
  Left = 253
  Top = 315
  Width = 286
  Height = 204
  Caption = 'List Event'
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OnActivate = FormActivate
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 278
    Height = 22
    Align = alTop
    TabOrder = 0
    object Label1: TLabel
      Left = 168
      Top = 4
      Width = 53
      Height = 13
      Caption = 'Max.lines:  '
    end
    object BitBtn1: TBitBtn
      Left = 0
      Top = 1
      Width = 75
      Height = 22
      Caption = 'Clear List'
      TabOrder = 0
      OnClick = BitBtn1Click
    end
    object BitBtn2: TBitBtn
      Left = 75
      Top = 1
      Width = 75
      Height = 22
      Caption = 'Save List'
      TabOrder = 1
      OnClick = BitBtn2Click
    end
    object MaskEdit1: TMaskEdit
      Left = 224
      Top = 3
      Width = 49
      Height = 18
      EditMask = '!9999;1;_'
      MaxLength = 4
      TabOrder = 2
      Text = ' 100'
      OnExit = MaskEdit1Exit
    end
  end
  object Memo1: TMemo
    Left = 0
    Top = 22
    Width = 278
    Height = 155
    Align = alClient
    TabOrder = 1
  end
  object SD: TSaveDialog
    FileEditStyle = fsEdit
    Left = 240
    Top = 40
  end
end