main.dfm

HD 6P RFID 发卡器、考勤卡钟 RS232 通讯接口程序 Delphi 源码

object MainForm: TMainForm
  Left = 260
  Top = 163
  Width = 600
  Height = 451
  Caption = '6kTEST'
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = #23435#20307
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 14
  object BtConnect: TButton
    Left = 8
    Top = 77
    Width = 105
    Height = 25
    Caption = #20018#21475#36830#25509
    TabOrder = 0
    OnClick = BtConnectClick
  end
  object BtSetWK: TButton
    Left = 128
    Top = 151
    Width = 105
    Height = 25
    Caption = #35774#32622#21345#29255#26681#23494#38053
    TabOrder = 1
    OnClick = BtSetWKClick
  end
  object BtRing: TButton
    Left = 8
    Top = 150
    Width = 105
    Height = 25
    Caption = #40483#21483
    TabOrder = 2
    OnClick = BtRingClick
  end
  object Btcollectcard: TButton
    Left = 128
    Top = 77
    Width = 105
    Height = 25
    Caption = #23547#21345
    TabOrder = 3
    OnClick = BtcollectcardClick
  end
  object BtReadCard: TButton
    Left = 248
    Top = 77
    Width = 80
    Height = 25
    Caption = '6K'#35835#21345
    TabOrder = 4
    OnClick = BtReadCardClick
  end
  object BtWriteCard: TButton
    Left = 248
    Top = 114
    Width = 80
    Height = 25
    Caption = '6K'#20889#21345
    TabOrder = 5
    OnClick = BtWriteCardClick
  end
  object BtInicard: TButton
    Left = 344
    Top = 113
    Width = 105
    Height = 25
    Caption = #21021#22987#21270#21345
    TabOrder = 6
    OnClick = BtInicardClick
  end
  object BtEraseCard: TButton
    Left = 344
    Top = 148
    Width = 105
    Height = 25
    Caption = #27927#21345
    TabOrder = 7
    OnClick = BtEraseCardClick
  end
  object BtClear: TButton
    Left = 344
    Top = 182
    Width = 105
    Height = 25
    Caption = #28165#21345#25968#25454
    TabOrder = 8
    OnClick = BtClearClick
  end
  object Memo1: TMemo
    Left = 8
    Top = 269
    Width = 569
    Height = 140
    Lines.Strings = (
      '')
    TabOrder = 9
  end
  object BtReadSector: TButton
    Left = 128
    Top = 115
    Width = 105
    Height = 25
    Caption = #35835#25159#21306
    TabOrder = 10
    OnClick = BtReadSectorClick
  end
  object BtReader: TButton
    Left = 8
    Top = 115
    Width = 105
    Height = 25
    Caption = #35835#21345#22120#23646#24615
    TabOrder = 11
    OnClick = BtReaderClick
  end
  object BtReadEW: TButton
    Left = 248
    Top = 149
    Width = 80
    Height = 25
    Caption = #35835#38065#21253
    TabOrder = 12
    OnClick = BtReadEWClick
  end
  object BtWriteEW: TButton
    Left = 248
    Top = 183
    Width = 80
    Height = 25
    Caption = #20889#38065#21253
    TabOrder = 13
    OnClick = BtWriteEWClick
  end
  object GroupBox1: TGroupBox
    Left = 8
    Top = 8
    Width = 561
    Height = 57
    Caption = #20018#21475#37197#32622
    TabOrder = 14
    object Label1: TLabel
      Left = 24
      Top = 24
      Width = 49
      Height = 14
      Caption = ' '#20018#21475#21495
    end
    object Label2: TLabel
      Left = 192
      Top = 21
      Width = 56
      Height = 14
      Caption = #36890#35759#36895#29575
    end
    object CbmCom: TComboBox
      Left = 88
      Top = 17
      Width = 81
      Height = 22
      ItemHeight = 14
      TabOrder = 0
      Items.Strings = (
        'COM1'
        'COM2'
        'COM3'
        'COM4'
        'COM5'
        'COM6')
    end
    object Cbmbouad: TComboBox
      Left = 256
      Top = 16
      Width = 89
      Height = 22
      ItemHeight = 14
      TabOrder = 1
      Items.Strings = (
        '9600'
        '19200'
        '38400'
        '57600'
        '115200')
    end
  end
  object BTSetWaitTime: TButton
    Left = 344
    Top = 77
    Width = 105
    Height = 25
    Caption = #35774#32622#31561#24453#26102#38388
    TabOrder = 15
    OnClick = BTSetWaitTimeClick
  end
  object ReadCard4k: TButton
    Left = 472
    Top = 77
    Width = 105
    Height = 25
    Caption = '4K'#35835#21345
    TabOrder = 16
    OnClick = ReadCard4kClick
  end
  object writecard4K: TButton
    Left = 472
    Top = 109
    Width = 105
    Height = 25
    Caption = '4K'#20889#21345
    TabOrder = 17
    OnClick = writecard4KClick
  end
  object ReadEW4K: TButton
    Left = 472
    Top = 149
    Width = 105
    Height = 25
    Caption = '4K'#35835#38065#21253
    TabOrder = 18
    OnClick = ReadEW4KClick
  end
  object WriteEW4k: TButton
    Left = 472
    Top = 181
    Width = 105
    Height = 25
    Caption = '4K'#20889#38065#21253
    TabOrder = 19
    OnClick = WriteEW4kClick
  end
  object BtRWLog: TButton
    Left = 128
    Top = 184
    Width = 105
    Height = 25
    Caption = #35835#20889#26085#24535
    TabOrder = 20
    OnClick = BtRWLogClick
  end
end