mainform.dfm

16 relay output channels and 16 isolated digital input channels LED indicators to show activated

object frmMain: TfrmMain
  Left = 236
  Top = 256
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Digital Input with Interrupt for PCI-1753'
  ClientHeight = 249
  ClientWidth = 553
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 8
    Top = 16
    Width = 68
    Height = 13
    Caption = 'Device Name:'
  end
  object Label2: TLabel
    Left = 8
    Top = 48
    Width = 42
    Height = 13
    Caption = 'Channel:'
  end
  object Label9: TLabel
    Left = 144
    Top = 48
    Width = 54
    Height = 13
    Caption = 'Scan Time:'
  end
  object Label10: TLabel
    Left = 272
    Top = 48
    Width = 13
    Height = 13
    Caption = 'ms'
  end
  object txtDeviceName: TEdit
    Left = 80
    Top = 8
    Width = 185
    Height = 21
    Color = clMenu
    ReadOnly = True
    TabOrder = 0
  end
  object cmdSelectDevice: TButton
    Left = 280
    Top = 8
    Width = 65
    Height = 25
    Caption = 'Selection...'
    TabOrder = 1
    OnClick = cmdSelectDeviceClick
  end
  object txtChannel: TEdit
    Left = 80
    Top = 40
    Width = 49
    Height = 21
    TabOrder = 2
    Text = '0'
  end
  object grpConfig: TGroupBox
    Left = 8
    Top = 64
    Width = 337
    Height = 177
    Caption = 'Functions'
    TabOrder = 3
    object TLabel
      Left = 224
      Top = 24
      Width = 3
      Height = 13
    end
    object GroupBox2: TGroupBox
      Left = 8
      Top = 16
      Width = 321
      Height = 65
      Caption = 'Pattern Match'
      ParentShowHint = False
      ShowHint = False
      TabOrder = 0
      object Label4: TLabel
        Left = 136
        Top = 20
        Width = 50
        Height = 13
        Caption = 'PA0 Value'
      end
      object Label5: TLabel
        Left = 16
        Top = 20
        Width = 49
        Height = 13
        Caption = 'PA0 Mask'
      end
      object Label7: TLabel
        Left = 16
        Top = 44
        Width = 49
        Height = 13
        Caption = 'PA4 Mask'
      end
      object Label6: TLabel
        Left = 136
        Top = 44
        Width = 50
        Height = 13
        Caption = 'PA4 Value'
      end
      object txtPA0Value: TEdit
        Left = 200
        Top = 12
        Width = 33
        Height = 21
        TabOrder = 0
        Text = '00'
      end
      object txtPA0Mask: TEdit
        Left = 80
        Top = 12
        Width = 33
        Height = 21
        TabOrder = 1
        Text = '00'
      end
      object cmdPatternMatch: TButton
        Left = 248
        Top = 24
        Width = 65
        Height = 25
        Caption = 'Setting...'
        TabOrder = 2
        OnClick = cmdPatternMatchClick
      end
      object txtPA4Mask: TEdit
        Left = 80
        Top = 36
        Width = 33
        Height = 21
        TabOrder = 3
        Text = '00'
      end
      object txtPA4Value: TEdit
        Left = 200
        Top = 36
        Width = 33
        Height = 21
        TabOrder = 4
        Text = '00'
      end
    end
    object GroupBox3: TGroupBox
      Left = 8
      Top = 80
      Width = 321
      Height = 49
      Caption = 'Statur Change'
      TabOrder = 1
      object Label3: TLabel
        Left = 40
        Top = 24
        Width = 20
        Height = 13
        Caption = 'PB0'
      end
      object Label8: TLabel
        Left = 168
        Top = 24
        Width = 20
        Height = 13
        Caption = 'PB4'
      end
      object txtPB0Mask: TEdit
        Left = 80
        Top = 16
        Width = 33
        Height = 21
        TabOrder = 0
        Text = '00'
      end
      object txtPB4Mask: TEdit
        Left = 200
        Top = 16
        Width = 33
        Height = 21
        TabOrder = 1
        Text = '00'
      end
      object cmdStatusChange: TButton
        Left = 248
        Top = 16
        Width = 65
        Height = 25
        Caption = 'Setting...'
        TabOrder = 2
        OnClick = cmdStatusChangeClick
      end
    end
    object GroupBox4: TGroupBox
      Left = 8
      Top = 128
      Width = 321
      Height = 41
      Caption = ' INT of Port C group'
      TabOrder = 2
      object radPCEnable: TRadioButton
        Left = 72
        Top = 16
        Width = 81
        Height = 17
        Caption = 'Enable'
        TabOrder = 0
      end
      object radPCDisable: TRadioButton
        Left = 184
        Top = 16
        Width = 65
        Height = 17
        Caption = 'Disable'
        Checked = True
        TabOrder = 1
        TabStop = True
      end
    end
  end
  object txtScanTime: TEdit
    Left = 200
    Top = 40
    Width = 65
    Height = 21
    TabOrder = 4
    Text = '500'
  end
  object GroupBox5: TGroupBox
    Left = 360
    Top = 8
    Width = 185
    Height = 185
    Caption = 'Result'
    TabOrder = 5
    object Label11: TLabel
      Left = 8
      Top = 24
      Width = 101
      Height = 13
      Caption = 'Pattern Match Count:'
    end
    object Label12: TLabel
      Left = 8
      Top = 56
      Width = 104
      Height = 13
      Caption = 'Status Change Count:'
    end
    object Label13: TLabel
      Left = 8
      Top = 88
      Width = 55
      Height = 13
      Caption = 'INT Count: '
    end
    object Label14: TLabel
      Left = 8
      Top = 120
      Width = 26
      Height = 13
      Caption = 'Data:'
    end
    object txtPMCount: TEdit
      Left = 120
      Top = 16
      Width = 57
      Height = 21
      TabOrder = 0
    end
    object txtSCCount: TEdit
      Left = 120
      Top = 48
      Width = 57
      Height = 21
      TabOrder = 1
    end
    object txtINTCount: TEdit
      Left = 120
      Top = 80
      Width = 57
      Height = 21
      TabOrder = 2
    end
    object txtData: TEdit
      Left = 120
      Top = 112
      Width = 57
      Height = 21
      TabOrder = 3
    end
    object cmdStart: TButton
      Left = 16
      Top = 152
      Width = 75
      Height = 25
      Caption = '&Start'
      TabOrder = 4
      OnClick = cmdStartClick
    end
    object cmdStop: TButton
      Left = 104
      Top = 152
      Width = 75
      Height = 25
      Caption = '&Stop'
      Enabled = False
      TabOrder = 5
      OnClick = cmdStopClick
    end
  end
  object cmdExit: TButton
    Left = 464
    Top = 208
    Width = 75
    Height = 25
    Caption = 'E&xit'
    TabOrder = 6
    OnClick = cmdExitClick
  end
  object tmrScan: TTimer
    Enabled = False
    Interval = 500
    OnTimer = tmrScanTimer
    Left = 296
    Top = 40
  end
end