statusform.dfm

来自「16 relay output channels and 16 isolated」· DFM 代码 · 共 321 行

DFM
321
字号
object frmStatus: TfrmStatus
  Left = 286
  Top = 200
  Width = 477
  Height = 178
  Caption = 'frmStatus'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Panel9: TPanel
    Left = 8
    Top = 8
    Width = 345
    Height = 139
    BevelInner = bvRaised
    BevelOuter = bvLowered
    TabOrder = 0
    object Label1: TLabel
      Left = 309
      Top = 16
      Width = 6
      Height = 13
      Caption = '0'
    end
    object Label2: TLabel
      Left = 282
      Top = 16
      Width = 6
      Height = 13
      Caption = '1'
    end
    object Label3: TLabel
      Left = 254
      Top = 16
      Width = 6
      Height = 13
      Caption = '2'
    end
    object Label4: TLabel
      Left = 227
      Top = 16
      Width = 6
      Height = 13
      Caption = '3'
    end
    object Label5: TLabel
      Left = 199
      Top = 16
      Width = 6
      Height = 13
      Caption = '4'
    end
    object Label6: TLabel
      Left = 172
      Top = 16
      Width = 6
      Height = 13
      Caption = '5'
    end
    object Label7: TLabel
      Left = 144
      Top = 16
      Width = 6
      Height = 13
      Caption = '6'
    end
    object Label8: TLabel
      Left = 117
      Top = 16
      Width = 6
      Height = 13
      Caption = '7'
    end
    object Label9: TLabel
      Left = 48
      Top = 16
      Width = 18
      Height = 13
      Caption = 'Bit :'
    end
    object Label10: TLabel
      Left = 48
      Top = 40
      Width = 45
      Height = 13
      Caption = 'Enabled :'
    end
    object Label11: TLabel
      Left = 8
      Top = 72
      Width = 87
      Height = 13
      Caption = 'Rising Edge Trig. :'
    end
    object Label12: TLabel
      Left = 8
      Top = 104
      Width = 88
      Height = 13
      Caption = 'Falling Edge Trig. :'
    end
    object chkBitEnable0: TCheckBox
      Left = 306
      Top = 40
      Width = 15
      Height = 17
      TabOrder = 0
      OnClick = chkBitEnable7Click
    end
    object chkBitEnable1: TCheckBox
      Left = 279
      Top = 40
      Width = 15
      Height = 17
      TabOrder = 1
      OnClick = chkBitEnable7Click
    end
    object chkBitEnable3: TCheckBox
      Left = 224
      Top = 40
      Width = 15
      Height = 17
      TabOrder = 2
      OnClick = chkBitEnable7Click
    end
    object chkBitEnable2: TCheckBox
      Left = 251
      Top = 40
      Width = 15
      Height = 17
      TabOrder = 3
      OnClick = chkBitEnable7Click
    end
    object chkBitEnable5: TCheckBox
      Left = 169
      Top = 40
      Width = 15
      Height = 17
      TabOrder = 4
      OnClick = chkBitEnable7Click
    end
    object chkBitEnable4: TCheckBox
      Left = 196
      Top = 40
      Width = 15
      Height = 17
      TabOrder = 5
      OnClick = chkBitEnable7Click
    end
    object chkBitEnable7: TCheckBox
      Left = 114
      Top = 40
      Width = 15
      Height = 17
      TabOrder = 6
      OnClick = chkBitEnable7Click
    end
    object chkBitEnable6: TCheckBox
      Left = 143
      Top = 40
      Width = 13
      Height = 17
      TabOrder = 7
      OnClick = chkBitEnable7Click
    end
    object chkFalling7: TCheckBox
      Left = 114
      Top = 104
      Width = 15
      Height = 17
      Enabled = False
      TabOrder = 8
    end
    object chkRising7: TCheckBox
      Left = 114
      Top = 72
      Width = 15
      Height = 17
      Enabled = False
      TabOrder = 9
    end
    object chkRising6: TCheckBox
      Left = 141
      Top = 76
      Width = 15
      Height = 13
      Enabled = False
      TabOrder = 10
    end
    object chkFalling6: TCheckBox
      Left = 141
      Top = 104
      Width = 15
      Height = 17
      Enabled = False
      TabOrder = 11
    end
    object chkRising5: TCheckBox
      Left = 169
      Top = 72
      Width = 15
      Height = 18
      Enabled = False
      TabOrder = 12
    end
    object chkFalling5: TCheckBox
      Left = 169
      Top = 104
      Width = 15
      Height = 17
      Enabled = False
      TabOrder = 13
    end
    object chkRising4: TCheckBox
      Left = 196
      Top = 72
      Width = 15
      Height = 17
      Enabled = False
      TabOrder = 14
    end
    object chkFalling4: TCheckBox
      Left = 196
      Top = 104
      Width = 15
      Height = 17
      Enabled = False
      TabOrder = 15
    end
    object chkRising3: TCheckBox
      Left = 224
      Top = 72
      Width = 15
      Height = 17
      Enabled = False
      TabOrder = 16
    end
    object chkFalling3: TCheckBox
      Left = 224
      Top = 104
      Width = 15
      Height = 17
      Enabled = False
      TabOrder = 17
    end
    object chkRising2: TCheckBox
      Left = 251
      Top = 72
      Width = 15
      Height = 17
      Enabled = False
      TabOrder = 18
    end
    object chkFalling2: TCheckBox
      Left = 251
      Top = 104
      Width = 15
      Height = 17
      Enabled = False
      TabOrder = 19
    end
    object chkRising1: TCheckBox
      Left = 279
      Top = 72
      Width = 15
      Height = 17
      Enabled = False
      TabOrder = 20
    end
    object chkFalling1: TCheckBox
      Left = 279
      Top = 104
      Width = 15
      Height = 17
      Enabled = False
      TabOrder = 21
    end
    object chkRising0: TCheckBox
      Left = 306
      Top = 72
      Width = 15
      Height = 17
      Enabled = False
      TabOrder = 22
    end
    object chkFalling0: TCheckBox
      Left = 310
      Top = 104
      Width = 11
      Height = 17
      Enabled = False
      TabOrder = 23
    end
  end
  object btnOK: TButton
    Left = 376
    Top = 32
    Width = 75
    Height = 25
    Caption = 'OK'
    TabOrder = 1
    OnClick = btnOKClick
  end
  object btnCancel: TButton
    Left = 376
    Top = 88
    Width = 75
    Height = 25
    Caption = 'Cancel'
    TabOrder = 2
    OnClick = btnCancelClick
  end
end

⌨️ 快捷键说明

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