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

📄 frmmain.dfm

📁 附件采用EM4095 读头IC来读取Atmel的Tag芯片T5557
💻 DFM
字号:
object frmNMain: TfrmNMain
  Left = 460
  Top = 197
  BorderStyle = bsDialog
  Caption = 'T5557 Utility 1.0'
  ClientHeight = 379
  ClientWidth = 457
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object btnExit: TButton
    Left = 384
    Top = 344
    Width = 65
    Height = 25
    Caption = 'Exit'
    TabOrder = 0
    OnClick = btnExitClick
  end
  object tabT5557: TPageControl
    Left = 8
    Top = 72
    Width = 441
    Height = 257
    ActivePage = shtCommand
    TabIndex = 0
    TabOrder = 1
    object shtCommand: TTabSheet
      Caption = 'Command'
      object btnReadBlock: TButton
        Left = 208
        Top = 104
        Width = 81
        Height = 25
        Caption = 'ReadBlock'
        TabOrder = 0
      end
      object PageControl1: TPageControl
        Left = 56
        Top = 40
        Width = 337
        Height = 145
        ActivePage = shtRead
        TabIndex = 0
        TabOrder = 1
        object shtRead: TTabSheet
          Caption = 'Read'
          object Label13: TLabel
            Left = 32
            Top = 24
            Width = 22
            Height = 13
            Caption = 'Addr'
          end
          object Label14: TLabel
            Left = 32
            Top = 61
            Width = 23
            Height = 13
            Caption = 'Data'
          end
          object btnRead: TButton
            Left = 160
            Top = 56
            Width = 57
            Height = 25
            Caption = 'Read'
            TabOrder = 0
            OnClick = btnReadClick
          end
          object txtReadData: TEdit
            Left = 64
            Top = 56
            Width = 81
            Height = 21
            Enabled = False
            TabOrder = 1
          end
          object txtReadAddr: TEdit
            Left = 64
            Top = 16
            Width = 25
            Height = 21
            MaxLength = 1
            TabOrder = 2
            Text = '1'
          end
        end
        object shtWrite: TTabSheet
          Caption = 'Write'
          ImageIndex = 1
          object Label11: TLabel
            Left = 32
            Top = 24
            Width = 22
            Height = 13
            Caption = 'Addr'
          end
          object Label12: TLabel
            Left = 32
            Top = 61
            Width = 23
            Height = 13
            Caption = 'Data'
          end
          object btnWriteBlock: TButton
            Left = 160
            Top = 56
            Width = 57
            Height = 25
            Caption = 'Write'
            TabOrder = 0
            OnClick = btnWriteBlockClick
          end
          object txtWriteData: TEdit
            Left = 64
            Top = 56
            Width = 81
            Height = 21
            TabOrder = 1
            Text = '00000000'
          end
          object txtWriteAddr: TEdit
            Left = 64
            Top = 16
            Width = 25
            Height = 21
            MaxLength = 1
            TabOrder = 2
            Text = '1'
          end
        end
      end
    end
    object shtConfig: TTabSheet
      Caption = 'Config'
      ImageIndex = 1
      object Label1: TLabel
        Left = 16
        Top = 24
        Width = 50
        Height = 13
        Caption = 'MasterKey'
        Enabled = False
      end
      object Label2: TLabel
        Left = 146
        Top = 25
        Width = 37
        Height = 13
        Caption = 'X-Mode'
        Enabled = False
      end
      object Label3: TLabel
        Left = 32
        Top = 61
        Width = 35
        Height = 13
        Caption = 'BitRate'
        Enabled = False
      end
      object Label4: TLabel
        Left = 16
        Top = 90
        Width = 52
        Height = 13
        Caption = 'Modulation'
        Enabled = False
      end
      object Label5: TLabel
        Left = 32
        Top = 120
        Width = 37
        Height = 13
        Caption = 'PSK-CF'
        Enabled = False
      end
      object Label6: TLabel
        Left = 48
        Top = 147
        Width = 23
        Height = 13
        Caption = 'AOR'
        Enabled = False
      end
      object Label7: TLabel
        Left = 24
        Top = 178
        Width = 47
        Height = 13
        Caption = 'MaxBlock'
      end
      object lblPWD: TLabel
        Left = 228
        Top = 56
        Width = 26
        Height = 13
        Caption = 'PWD'
        Enabled = False
      end
      object Label9: TLabel
        Left = 240
        Top = 88
        Width = 14
        Height = 13
        Caption = 'ST'
        Enabled = False
      end
      object Label10: TLabel
        Left = 203
        Top = 117
        Width = 53
        Height = 13
        Caption = 'POR Delay'
        Enabled = False
      end
      object Label15: TLabel
        Left = 224
        Top = 201
        Width = 30
        Height = 13
        Caption = 'Config'
      end
      object cboMasterKey: TComboBox
        Left = 80
        Top = 23
        Width = 57
        Height = 21
        Style = csDropDownList
        Enabled = False
        ItemHeight = 13
        ItemIndex = 0
        TabOrder = 0
        Text = '0'
        OnChange = cboMasterKeyChange
        Items.Strings = (
          '0'
          '6'
          '9')
      end
      object cboXMode: TComboBox
        Left = 192
        Top = 24
        Width = 49
        Height = 21
        Enabled = False
        ItemHeight = 13
        ItemIndex = 1
        TabOrder = 1
        Text = 'Off'
        OnChange = cboXModeChange
        Items.Strings = (
          'On'
          'Off')
      end
      object cboBitRate: TComboBox
        Left = 80
        Top = 53
        Width = 73
        Height = 21
        Enabled = False
        ItemHeight = 13
        ItemIndex = 2
        TabOrder = 2
        Text = 'RF/32'
        OnChange = cboBitRateChange
        Items.Strings = (
          'RF/8'
          'RF/16'
          'RF/32'
          'RF/40'
          'RF/50'
          'RF/64'
          'RF/100'
          'RF/128')
      end
      object cboModulation: TComboBox
        Left = 80
        Top = 84
        Width = 97
        Height = 21
        Enabled = False
        ItemHeight = 13
        ItemIndex = 8
        TabOrder = 3
        Text = 'Manchester'
        OnChange = cboModulationChange
        Items.Strings = (
          'Direct'
          'PSK1'
          'PSK2'
          'PSK3'
          'FSK1'
          'FSK2'
          'FSK1a'
          'FSK2a'
          'Manchester'
          'Biphase')
      end
      object cboPSKCF: TComboBox
        Left = 80
        Top = 114
        Width = 97
        Height = 21
        Enabled = False
        ItemHeight = 13
        ItemIndex = 0
        TabOrder = 4
        Text = 'RF/2'
        OnChange = cboPSKCFChange
        Items.Strings = (
          'RF/2'
          'RF/4'
          'RF/8')
      end
      object cboAOR: TComboBox
        Left = 80
        Top = 145
        Width = 49
        Height = 21
        Enabled = False
        ItemHeight = 13
        ItemIndex = 0
        TabOrder = 5
        Text = 'Off'
        OnChange = cboAORChange
        Items.Strings = (
          'Off'
          'On')
      end
      object cboMaxBlock: TComboBox
        Left = 80
        Top = 175
        Width = 57
        Height = 21
        ItemHeight = 13
        ItemIndex = 7
        TabOrder = 6
        Text = '7'
        OnChange = cboMaxBlockChange
        Items.Strings = (
          '0'
          '1'
          '2'
          '3'
          '4'
          '5'
          '6'
          '7')
      end
      object cboPWD: TComboBox
        Left = 264
        Top = 54
        Width = 49
        Height = 21
        Enabled = False
        ItemHeight = 13
        ItemIndex = 0
        TabOrder = 7
        Text = 'Off'
        OnChange = cboPWDChange
        Items.Strings = (
          'Off'
          'On')
      end
      object cboST: TComboBox
        Left = 264
        Top = 84
        Width = 49
        Height = 21
        Enabled = False
        ItemHeight = 13
        ItemIndex = 1
        TabOrder = 8
        Text = 'On'
        OnChange = cboSTChange
        Items.Strings = (
          'Off'
          'On')
      end
      object cboPORDelay: TComboBox
        Left = 264
        Top = 115
        Width = 49
        Height = 21
        Enabled = False
        ItemHeight = 13
        ItemIndex = 0
        TabOrder = 9
        Text = 'Off'
        OnChange = cboPORDelayChange
        Items.Strings = (
          'Off'
          'On')
      end
      object btnUpdateConfig: TButton
        Left = 360
        Top = 200
        Width = 65
        Height = 25
        Caption = 'Update'
        TabOrder = 10
        OnClick = btnUpdateConfigClick
      end
      object txtConfig: TEdit
        Left = 264
        Top = 200
        Width = 81
        Height = 21
        Enabled = False
        TabOrder = 11
        Text = '000880E8'
      end
    end
    object shtRegularRead: TTabSheet
      Caption = 'RegularRead'
      ImageIndex = 2
      object chkRegularRead: TCheckBox
        Left = 320
        Top = 16
        Width = 97
        Height = 17
        Caption = 'RegularRead'
        Color = clBtnFace
        ParentColor = False
        TabOrder = 0
        OnClick = chkRegularReadClick
      end
      object txtRegularRead: TEdit
        Left = 16
        Top = 176
        Width = 385
        Height = 21
        TabOrder = 1
      end
      object GroupBox2: TGroupBox
        Left = 16
        Top = 8
        Width = 249
        Height = 41
        TabOrder = 2
        object rdoEM4100: TRadioButton
          Left = 88
          Top = 16
          Width = 65
          Height = 17
          Caption = 'EM4100'
          Enabled = False
          TabOrder = 0
        end
        object rdoT5557: TRadioButton
          Left = 16
          Top = 16
          Width = 65
          Height = 17
          Caption = 'T5557'
          Checked = True
          TabOrder = 1
          TabStop = True
        end
        object rdoAnimal: TRadioButton
          Left = 168
          Top = 16
          Width = 73
          Height = 17
          Caption = 'Animal'
          Enabled = False
          TabOrder = 2
        end
      end
      object grpT5557: TGroupBox
        Left = 16
        Top = 56
        Width = 249
        Height = 113
        Caption = 'T5557'
        TabOrder = 3
        object Label8: TLabel
          Left = 17
          Top = 72
          Width = 32
          Height = 13
          Caption = 'Blocks'
        end
        object txtBlocks: TEdit
          Left = 64
          Top = 72
          Width = 25
          Height = 21
          MaxLength = 1
          TabOrder = 0
          Text = '7'
        end
        object rdoBlocks: TRadioButton
          Left = 16
          Top = 24
          Width = 57
          Height = 17
          Caption = 'Blocks'
          Checked = True
          TabOrder = 1
          TabStop = True
          OnClick = rdoBlocksClick
        end
        object rdoTID: TRadioButton
          Left = 88
          Top = 24
          Width = 57
          Height = 17
          Caption = 'TID'
          TabOrder = 2
          OnClick = rdoTIDClick
        end
      end
      object btnTest: TButton
        Left = 344
        Top = 140
        Width = 57
        Height = 25
        Caption = 'Test'
        TabOrder = 4
        Visible = False
        OnClick = btnTestClick
      end
    end
  end
  object GroupBox1: TGroupBox
    Left = 8
    Top = 8
    Width = 441
    Height = 65
    TabOrder = 2
    object lblCom: TLabel
      Left = 24
      Top = 27
      Width = 24
      Height = 13
      Caption = 'COM'
    end
    object btnOpenCom1: TButton
      Left = 112
      Top = 24
      Width = 65
      Height = 25
      Caption = 'Connect'
      TabOrder = 0
      OnClick = btnOpenCom1Click
    end
    object btnDisconnect: TButton
      Left = 184
      Top = 24
      Width = 65
      Height = 25
      Caption = 'Disconnect'
      TabOrder = 1
      OnClick = btnDisconnectClick
    end
    object txtCom: TEdit
      Left = 64
      Top = 24
      Width = 33
      Height = 21
      TabOrder = 2
      Text = '1'
    end
  end
  object Timer1: TTimer
    Enabled = False
    OnTimer = Timer1Timer
    Left = 400
    Top = 24
  end
end

⌨️ 快捷键说明

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