⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 asc2setup.dfm

📁 朗铭科技Ls-810 门禁控制器接口 delphi源程
💻 DFM
📖 第 1 页 / 共 5 页
字号:
        Left = 118
        Top = 274
        Width = 28
        Height = 20
        TabOrder = 8
        Text = '2'
      end
      object AlarmStopEdit4: TEdit
        Left = 214
        Top = 274
        Width = 28
        Height = 20
        TabOrder = 9
        Text = '1'
      end
      object HolidaysEdit: TEdit
        Left = 66
        Top = 14
        Width = 41
        Height = 20
        TabOrder = 10
        Text = '0'
      end
    end
    object TabSheet4: TTabSheet
      Caption = '钥匙卡'
      ImageIndex = 3
      object ClearCardDefButton: TSpeedButton
        Left = 352
        Top = 10
        Width = 56
        Height = 24
        Caption = '清除'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
          555557777F777555F55500000000555055557777777755F75555005500055055
          555577F5777F57555555005550055555555577FF577F5FF55555500550050055
          5555577FF77577FF555555005050110555555577F757777FF555555505099910
          555555FF75777777FF555005550999910555577F5F77777775F5500505509990
          3055577F75F77777575F55005055090B030555775755777575755555555550B0
          B03055555F555757575755550555550B0B335555755555757555555555555550
          BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
          50BB555555555555575F555555555555550B5555555555555575}
        NumGlyphs = 2
        OnClick = ClearCardDefButtonClick
      end
      object ReadCardDefButton: TSpeedButton
        Left = 166
        Top = 10
        Width = 56
        Height = 24
        Caption = '读出'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333303
          333333333333337FF3333333333333903333333333333377FF33333333333399
          03333FFFFFFFFF777FF3000000999999903377777777777777FF0FFFF0999999
          99037F3337777777777F0FFFF099999999907F3FF777777777770F00F0999999
          99037F773777777777730FFFF099999990337F3FF777777777330F00FFFFF099
          03337F773333377773330FFFFFFFF09033337F3FF3FFF77733330F00F0000003
          33337F773777777333330FFFF0FF033333337F3FF7F3733333330F08F0F03333
          33337F7737F7333333330FFFF003333333337FFFF77333333333000000333333
          3333777777333333333333333333333333333333333333333333}
        NumGlyphs = 2
        OnClick = ReadCardDefButtonClick
      end
      object WriteCardDefButton: TSpeedButton
        Left = 228
        Top = 10
        Width = 56
        Height = 24
        Caption = '写入'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
          FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
          00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
          F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
          00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
          F033777777777337F73309999990FFF0033377777777FFF77333099999000000
          3333777777777777333333399033333333333337773333333333333903333333
          3333333773333333333333303333333333333337333333333333}
        NumGlyphs = 2
        OnClick = WriteCardDefButtonClick
      end
      object Label20: TLabel
        Left = 218
        Top = 300
        Width = 36
        Height = 12
        Caption = '密码长'
      end
      object UpdateCardDefButton: TSpeedButton
        Left = 290
        Top = 10
        Width = 56
        Height = 24
        Caption = '更新'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
          FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
          00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
          F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
          00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
          F033777777777337F73309999990FFF0033377777777FFF77333099999000000
          3333777777777777333333399033333333333337773333333333333903333333
          3333333773333333333333303333333333333337333333333333}
        NumGlyphs = 2
        OnClick = UpdateCardDefButtonClick
      end
      object Label21: TLabel
        Left = 10
        Top = 16
        Width = 36
        Height = 12
        Caption = '卡数:'
      end
      object Label22: TLabel
        Left = 88
        Top = 16
        Width = 36
        Height = 12
        Caption = '指针:'
      end
      object CardStringGrid: TStringGrid
        Left = 10
        Top = 38
        Width = 399
        Height = 255
        DefaultColWidth = 74
        DefaultRowHeight = 17
        FixedCols = 0
        RowCount = 4097
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing]
        TabOrder = 0
        OnSelectCell = CardStringGridSelectCell
      end
      object ValidChkBox: TCheckBox
        Left = 264
        Top = 298
        Width = 43
        Height = 17
        Caption = '签发'
        TabOrder = 1
        OnClick = ValidChkBoxClick
      end
      object PINLenEdit: TEdit
        Left = 198
        Top = 296
        Width = 15
        Height = 20
        MaxLength = 7
        TabOrder = 2
        Text = '6'
        OnChange = PINLenEditChange
      end
      object CardLevelChkBox: TCheckBox
        Left = 134
        Top = 298
        Width = 57
        Height = 19
        Caption = '管理卡'
        TabOrder = 3
        OnClick = CardLevelChkBoxClick
      end
      object CardCountEdit: TEdit
        Left = 46
        Top = 12
        Width = 33
        Height = 20
        TabOrder = 4
        Text = '0'
      end
      object CardPtrEdit: TEdit
        Left = 124
        Top = 12
        Width = 33
        Height = 20
        TabOrder = 5
        Text = '0'
      end
      object ReaderChkBoxL: TCheckBox
        Left = 10
        Top = 298
        Width = 57
        Height = 19
        Caption = '左读头'
        TabOrder = 6
        OnClick = ReaderChkBoxLClick
      end
      object ReaderChkBoxR: TCheckBox
        Left = 72
        Top = 298
        Width = 55
        Height = 19
        Caption = '右读头'
        TabOrder = 7
        OnClick = ReaderChkBoxRClick
      end
    end
    object TabSheet5: TTabSheet
      Caption = '事件记录'
      ImageIndex = 4
      object ReadRecordCountButton: TSpeedButton
        Left = 10
        Top = 34
        Width = 93
        Height = 21
        Caption = '读记录总数'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333303
          333333333333337FF3333333333333903333333333333377FF33333333333399
          03333FFFFFFFFF777FF3000000999999903377777777777777FF0FFFF0999999
          99037F3337777777777F0FFFF099999999907F3FF777777777770F00F0999999
          99037F773777777777730FFFF099999990337F3FF777777777330F00FFFFF099
          03337F773333377773330FFFFFFFF09033337F3FF3FFF77733330F00F0000003
          33337F773777777333330FFFF0FF033333337F3FF7F3733333330F08F0F03333
          33337F7737F7333333330FFFF003333333337FFFF77333333333000000333333
          3333777777333333333333333333333333333333333333333333}
        NumGlyphs = 2
        OnClick = ReadRecordCountButtonClick
      end
      object ReadRecordButton: TSpeedButton
        Left = 196
        Top = 32
        Width = 56
        Height = 21
        Caption = '读出'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333303
          333333333333337FF3333333333333903333333333333377FF33333333333399
          03333FFFFFFFFF777FF3000000999999903377777777777777FF0FFFF0999999
          99037F3337777777777F0FFFF099999999907F3FF777777777770F00F0999999
          99037F773777777777730FFFF099999990337F3FF777777777330F00FFFFF099
          03337F773333377773330FFFFFFFF09033337F3FF3FFF77733330F00F0000003
          33337F773777777333330FFFF0FF033333337F3FF7F3733333330F08F0F03333
          33337F7737F7333333330FFFF003333333337FFFF77333333333000000333333
          3333777777333333333333333333333333333333333333333333}
        NumGlyphs = 2
        OnClick = ReadRecordButtonClick
      end
      object ClearRecordButton: TSpeedButton
        Left = 260
        Top = 6
        Width = 78
        Height = 21
        Caption = '清除'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
          555557777F777555F55500000000555055557777777755F75555005500055055
          555577F5777F57555555005550055555555577FF577F5FF55555500550050055
          5555577FF77577FF555555005050110555555577F757777FF555555505099910
          555555FF75777777FF555005550999910555577F5F77777775F5500505509990
          3055577F75F77777575F55005055090B030555775755777575755555555550B0
          B03055555F555757575755550555550B0B335555755555757555555555555550
          BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
          50BB555555555555575F555555555555550B5555555555555575}
        NumGlyphs = 2
        OnClick = ClearRecordButtonClick
      end
      object ForceReadRecordButton: TSpeedButton
        Left = 260
        Top = 32
        Width = 78
        Height = 21
        Caption = '强制读出'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333303
          333333333333337FF3333333333333903333333333333377FF33333333333399
          03333FFFFFFFFF777FF3000000999999903377777777777777FF0FFFF0999999
          99037F3337777777777F0FFFF099999999907F3FF777777777770F00F0999999
          99037F773777777777730FFFF099999990337F3FF777777777330F00FFFFF099
          03337F773333377773330FFFFFFFF09033337F3FF3FFF77733330F00F0000003
          33337F773777777333330FFFF0FF033333337F3FF7F3733333330F08F0F03333
          33337F7737F7333333330FFFF003333333337FFFF77333333333000000333333
          3333777777333333333333333333333333333333333333333333}
        NumGlyphs = 2
        OnClick = ForceReadRecordButtonClick
      end
      object StopButton: TSpeedButton
        Left = 346
        Top = 32
        Width = 66
        Height = 21
        Caption = '终止'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          333333333333333333333333333333333333333FFF33FF333FFF339993370733
          999333777FF37FF377733339993000399933333777F777F77733333399970799
          93333333777F7377733333333999399933333333377737773333333333990993
          3333333333737F73333333333331013333333333333777FF3333333333910193
          333333333337773FF3333333399000993333333337377737FF33333399900099
          93333333773777377FF333399930003999333337773777F777FF339993370733
          9993337773337333777333333333333333333333333333333333333333333333
          3333333333333333333333333333333333333333333333333333}
        NumGlyphs = 2
        OnClick = StopButtonClick
      end
      object StaticText18: TStaticText
        Left = 12
        Top = 10
        Width = 52
        Height = 16
        Caption = '总记录数'
        TabOrder = 0
      end
      object RecCountEdit: TEdit
        Left = 62
        Top = 6
        Width = 40
        Height = 20
        ReadOnly = True
        TabOrder = 1
        Text = '0'
      end
      object StaticText5: TStaticText
        Left = 122
        Top = 10
        Width = 28
        Height = 16
        Caption = '指针'
        TabOrder = 2
      end
      object StaticText12: TStaticText
        Left = 110
        Top = 36
        Width = 40
        Height = 16
        Caption = '记录数'
        TabOrder = 3
      end
      object RecReadCountEdit: TEdit
        Left = 150
        Top = 32
        Width = 40
        Height = 20
        TabOrder = 4
        Text = '0'
      end
      object RecAddrEdit: TEdit
        Left = 150
        Top = 6
        Width = 40
        Height = 20
        TabOrder = 5
        Text = '0'
      end
      object RecordStringGrid: TStringGrid
        Left = 10
        Top = 58
        Width = 401
        Height = 255
        ColCount = 6
        DefaultColWidth = 62
        DefaultRowHeight = 17
        FixedCols = 0
        RowCount = 7169
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing]
        TabOrder = 6
      end
    end
    object TabSheet6: TTabSheet
      Caption = '发卡记录'
      ImageIndex = 5
      object ValidCardClearButton: TSpeedButton
        Left = 174
        Top = 38
        Width = 80
        Height = 24
        Caption = '清除'
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
          555557777F777555F55500000000555055557777777755F75555005500055055
          555577F5777F57555555005550055555555577FF577F5FF55555500550050055
          5555577FF77577FF555555005050110555555577F757777FF555555505099910
          555555FF75777777FF555005550999910555577F5F77777775F5500505509990
          3055577F75F77777575F55005055090B030555775755777575755555555550B0
          B03055555F555757575755550555550B0B335555755555757555555555555550
          BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
          50BB555555555555575F555555555555550B5555555555555575}
        NumGlyphs = 2
        OnClick = ValidCardClearButtonClick
      end
      object ValidCardReadButton: TSpeedButton
        Left = 174

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -