对象MainForm: TMainForm左= 479身高= 654Top = 68 Width = 681 BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle Caption = 'Fast Card Read - uFR Series - Linear Raw read example' ClientHeight = 654 ClientWidth = 681 Font.CharSet = ANSI_CHARSET Font.Height = -13 Font.Name = 'Courier New' Font.Pitch = fpFixed Font.Quality = fqDraft KeyPreview = True OnActivate = FormActivate OnClose = FormClose OnCreate = FormCreate LCLVersion = '2.0.2.0' object Memo1: TMemo Left = 8 Height = 282 Top = 256 Width = 664 Font.CharSet = ANSI_CHARSET Font.Height = -12 Font.Name = 'Courier New' Font.Pitch = fpFixed Font.Quality = fqDraft Lines.Strings = ( 'This example is presenting fast card reading feature of uFR devices with' ' usage of "LinRowRead_" API command, by using default ' '$FF $FF $FF $FF $FF $FF Key A for Mifare Classic 1K and 4 K cards. ' '' 'If Default keyA does not match to card keyA, data will be represented as ''unknown'' or as ' 'row of $EE bytes.' '' 'For other card types key A is not used.' '' 'Data output will be automatically saved during card reading in following formats: ' 'as raw format (.mfd) ' 'and/or ' 'as .txt file ' 'if appropriate chekboxes are checked (UNchecked by default).' '' 'Feel free to use it on your projects. Enjoy!' '' 'Digital Logic Team - 2015' '' ) ParentBidiMode = False ParentFont = False ReadOnly = True ScrollBars = ssAutoBoth TabOrder = 1 end object btnOpen: TButton Left = 8 Height = 81 Top = 8 Width = 112 Caption = 'OPEN READER' OnClick = btnOpenClick TabOrder = 2 end object BtnInfo: TButton Left = 555 Height = 46 Top = 9 Width = 114 Caption = 'Card Info' Enabled = False OnClick = BtnInfoClick TabOrder = 3 end object mLog: TMemo Left = 8 Height = 104 Top = 544 Width = 664 Font.CharSet = ANSI_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'Courier New' Font.Pitch = fpFixed Font.Quality = fqDraft ParentFont = False TabOrder = 4 end object btnRead: TButton Left = 555 Height = 46 Top = 80 Width = 114 Caption = 'Read card' Enabled = False OnClick = btnReadClick TabOrder = 5 end object GroupBox1: TGroupBox Left = 8 Height = 41 Top = 208 Width = 661 ClientHeight = 20 ClientWidth = 657 TabOrder = 6 object cbTxt: TCheckBox Left = 375 Height = 19 Top = 1 Width = 139 Caption = 'Save as text file' Font.CharSet = ANSI_CHARSET Font.Height = -11 Font.Name = 'Courier New' Font.Pitch = fpFixed Font.Quality = fqDraft ParentFont = False TabOrder = 0 end object cbRaw: TCheckBox Left = 142 Height = 19 Top = 1 Width = 181 Caption = 'Save as raw data (.mfd)' Font.CharSet = ANSI_CHARSET Font.Height = -11 Font.Name = 'Courier New' Font.Pitch = fpFixed Font.Quality = fqDraft ParentFont = False TabOrder = 1 end object Label1: TLabel Left = 8 Height = 15 Top = 4 Width = 105 Caption = 'Output options:' Font.CharSet = ANSI_CHARSET Font.Color = clNavy Font.Height = -12 Font.Name = 'Courier New' Font.Pitch = fpFixed Font.Quality = fqDraft ParentColor = False ParentFont = False end end object mInfo: TMemo Left = 128 Height = 81 Top = 9 Width = 420 Color = clInfoBk Font.CharSet = ANSI_CHARSET Font.Color = clNavy Font.Height = -12 Font.Name = 'Courier New' Font.Pitch = fpFixed Font.Quality = fqDraft ParentBidiMode = False ParentFont = False ReadOnly = True TabOrder = 0 TabStop = False end object groupAdvanced: TGroupBox Left = 8 Height = 65 Top = 136 Width = 664 Caption = 'Advanced options' ClientHeight = 44 ClientWidth = 660 Enabled = False TabOrder = 7 object lblReaderType: TLabel Left = 8 Height = 16 Top = 16 Width = 96 Caption = 'Reader type:' ParentColor = False end object txtReaderType: TEdit Left = 112 Height = 24 Top = 13 Width = 24 Alignment = taCenter TabOrder = 0 end object lblPortName: TLabel Left = 144 Height = 16 Top = 16 Width = 80 Caption = 'Port name:' ParentColor = False end object txtPortName: TEdit Left = 232 Height = 24 Top = 13 Width = 128 Alignment = taCenter TabOrder = 1 end object lblPortInterface: TLabel Left = 368 Height = 16 Top = 16 Width = 120 Caption = 'Port interface:' ParentColor = False end object txtPortInterface: TEdit Left = 496 Height = 24 Top = 13 Width = 24 Alignment = taCenter TabOrder = 2 end object lblArg: TLabel Left = 528 Height = 16 Top = 16 Width = 32 Caption = 'Arg:' ParentColor = False end object txtArg: TEdit Left = 568 Height = 24 Top = 13 Width = 88 Alignment = taCenter TabOrder = 3 end end object checkAdvanced: TCheckBox Left = 14 Height = 20 Top = 104 Width = 180 Caption = 'Use Advanced options' OnClick = checkAdvancedClick TabOrder = 8 end end

map