comportunit.dfm

传真开发时的端口控制源码

object ComPortForm: TComPortForm
  Left = 88
  Top = 32
  Width = 532
  Height = 350
  Caption = 'ComPortForm'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Test: TButton
    Left = 16
    Top = 275
    Width = 89
    Height = 26
    Caption = '测试'
    TabOrder = 0
    OnClick = TestClick
  end
  object LogOps: TRadioGroup
    Left = 128
    Top = 251
    Width = 393
    Height = 65
    Caption = '日志选项'
    Columns = 3
    ItemIndex = 0
    Items.Strings = (
      '不跟踪tlOff'
      '跟踪tlOn'
      '写日志tlDump'
      '添加tlAppend'
      '清除tlClear'
      '暂停tlPause')
    TabOrder = 1
    OnClick = LogOpsClick
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 0
    Width = 521
    Height = 241
    ActivePage = TabSheet1
    TabOrder = 2
    object TabSheet1: TTabSheet
      Caption = '终端'
      object AdTerminal1: TAdTerminal
        Left = 0
        Top = 0
        Width = 513
        Height = 213
        Active = False
        CaptureFile = 'APRO.CAP'
        ComPort = ApdComPort1
        Scrollback = False
        UseLazyDisplay = False
        WantAllKeys = False
        Align = alClient
        Color = clBlack
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clSilver
        Font.Height = -13
        Font.Name = 'Terminal'
        Font.Style = []
        ParentColor = False
        ParentFont = False
        TabOrder = 0
      end
    end
    object TabSheet2: TTabSheet
      Caption = '列表框'
      ImageIndex = 1
    end
  end
  object ApdComPort1: TApdComPort
    BufferFull = 3686
    BufferResume = 409
    Tracing = tlOn
    TraceName = 'APD.TRC'
    Logging = tlOn
    LogName = 'APD.LOG'
    UseEventWord = False
    OnTriggerAvail = ApdComPort1TriggerAvail
    OnTriggerData = ApdComPort1TriggerData
    OnTriggerTimer = ApdComPort1TriggerTimer
    Left = 5
    Top = 7
  end
end