object MainForm: TMainForm
  Left = 202
  Top = 153
  Width = 610
  Height = 468
  Caption = 'Test Console (delphi build)'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Memo1: TMemo
    Left = 0
    Top = 0
    Width = 602
    Height = 414
    Align = alClient
    TabOrder = 0
  end
  object MainMenu1: TMainMenu
    Left = 160
    Top = 16
    object File1: TMenuItem
      Caption = 'File'
      object Exit1: TMenuItem
        Caption = 'E&xit'
        OnClick = Exit1Click
      end
    end
    object Settings1: TMenuItem
      Caption = 'Settings'
      object TargetUserID1: TMenuItem
        Caption = 'Target UserID'
        OnClick = TargetUserID1Click
      end
      object Passwordforreading1: TMenuItem
        Caption = 'Password for reading'
        OnClick = Passwordforreading1Click
      end
      object Passwordforwriting1: TMenuItem
        Caption = 'Password for writing'
        OnClick = Passwordforwriting1Click
      end
    end
    object Operations1: TMenuItem
      Caption = 'Operations'
      object Open1: TMenuItem
        Caption = 'Open'
        OnClick = Open1Click
      end
      object Close1: TMenuItem
        Caption = 'Close'
        OnClick = Close1Click
      end
      object Openfromlist1: TMenuItem
        Caption = 'Open from list'
        OnClick = Openfromlist1Click
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object RWbyindex1: TMenuItem
        Caption = 'R/W by index'
        OnClick = RWbyindex1Click
      end
      object Query1: TMenuItem
        Caption = 'Query'
        OnClick = Query1Click
      end
      object SerialNo1: TMenuItem
        Caption = 'SerialNo'
        OnClick = SerialNo1Click
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object Setnewreadpassword1: TMenuItem
        Caption = 'Set new read password'
        OnClick = Setnewreadpassword1Click
      end
      object Setnewwritepassword1: TMenuItem
        Caption = 'Set new write password'
        OnClick = Setnewwritepassword1Click
      end
    end
    object ClearOutput1: TMenuItem
      Caption = 'Clear Output'
      OnClick = ClearOutput1Click
    end
  end
end