安全芯加密狗 安全芯加密狗

				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