main.dfm

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

DFM
205
字号
object FrmMain: TFrmMain
  Left = 382
  Top = 124
  BorderStyle = bsDialog
  Caption = 'Advantech Driver Demo : Analog output with bus master DMA'
  ClientHeight = 239
  ClientWidth = 428
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 318
    Top = 147
    Width = 69
    Height = 13
    Caption = 'Wave Count ='
  end
  object Label2: TLabel
    Left = 3
    Top = 210
    Width = 296
    Height = 13
    Caption = '* If  1 < Wave Count < INFINITE, Conv.# can'#39't less than 2048.'
  end
  object Waveform: TButton
    Left = 328
    Top = 24
    Width = 81
    Height = 25
    Caption = 'Waveform'
    TabOrder = 0
    OnClick = WaveformClick
  end
  object Run: TButton
    Left = 328
    Top = 64
    Width = 81
    Height = 25
    Caption = 'Run'
    Enabled = False
    TabOrder = 1
    OnClick = RunClick
  end
  object Stop: TButton
    Left = 328
    Top = 104
    Width = 81
    Height = 25
    Caption = 'Stop'
    Enabled = False
    TabOrder = 2
    OnClick = StopClick
  end
  object WaveCountText: TEdit
    Left = 320
    Top = 168
    Width = 97
    Height = 21
    ImeName = #32043#20809#25340#38899#36755#20837#27861
    TabOrder = 3
  end
  object GroupBox1: TGroupBox
    Left = 13
    Top = 8
    Width = 273
    Height = 49
    Caption = 'Select Device from Device List'
    TabOrder = 4
    object DevSel: TButton
      Left = 8
      Top = 16
      Width = 257
      Height = 25
      Caption = 'No Device'
      TabOrder = 0
      OnClick = DevSelClick
    end
  end
  object GroupBox2: TGroupBox
    Left = 13
    Top = 72
    Width = 97
    Height = 57
    Caption = 'Pacer Rate'
    TabOrder = 5
    object Label3: TLabel
      Left = 72
      Top = 28
      Width = 13
      Height = 13
      Caption = 'Hz'
    end
    object Pacer: TEdit
      Left = 8
      Top = 24
      Width = 57
      Height = 21
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      TabOrder = 0
      OnChange = PacerChange
    end
  end
  object GroupBox3: TGroupBox
    Left = 118
    Top = 72
    Width = 72
    Height = 57
    Caption = 'Conv. #'
    TabOrder = 6
    object Conv: TEdit
      Left = 8
      Top = 24
      Width = 57
      Height = 21
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      TabOrder = 0
      OnChange = ConvChange
    end
  end
  object GroupBox4: TGroupBox
    Left = 198
    Top = 72
    Width = 88
    Height = 57
    Caption = 'Wave Count'
    TabOrder = 7
    object WaveCount: TEdit
      Left = 8
      Top = 24
      Width = 73
      Height = 21
      ImeName = #32043#20809#25340#38899#36755#20837#27861
      TabOrder = 0
      OnChange = WaveCountChange
    end
  end
  object GroupBox5: TGroupBox
    Left = 13
    Top = 141
    Width = 97
    Height = 57
    Caption = 'Trigger Source'
    TabOrder = 8
    object IntTrig: TRadioButton
      Left = 16
      Top = 16
      Width = 57
      Height = 17
      Caption = 'Internal'
      TabOrder = 0
      OnClick = IntTrigClick
    end
    object ExtTrig: TRadioButton
      Left = 16
      Top = 34
      Width = 65
      Height = 17
      Caption = 'External'
      TabOrder = 1
      OnClick = ExtTrigClick
    end
  end
  object GroupBox6: TGroupBox
    Left = 116
    Top = 141
    Width = 97
    Height = 57
    Caption = 'Event'
    TabOrder = 9
    object EvtEnable: TRadioButton
      Left = 16
      Top = 16
      Width = 57
      Height = 17
      Caption = 'Enable'
      TabOrder = 0
      OnClick = EvtEnableClick
    end
    object EvtDisable: TRadioButton
      Left = 16
      Top = 34
      Width = 65
      Height = 17
      Caption = 'Disable'
      TabOrder = 1
      OnClick = EvtDisableClick
    end
  end
  object Tmr: TTimer
    Enabled = False
    Interval = 50
    OnTimer = TmrTimer
    Left = 272
    Top = 160
  end
end

⌨️ 快捷键说明

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