main.dfm

这是一个用于实现电脑和pic单片机通讯的

object Form1: TForm1
  Left = 287
  Top = 174
  Width = 222
  Height = 214
  Caption = 'PICDEM CDC Test'
  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 = 14
    Top = 28
    Width = 46
    Height = 13
    Caption = 'ADC ch 0'
  end
  object Label2: TLabel
    Left = 77
    Top = 42
    Width = 20
    Height = 13
    Caption = 'Volt'
  end
  object Label3: TLabel
    Left = 140
    Top = 14
    Width = 18
    Height = 13
    Caption = '5 V'
  end
  object Label4: TLabel
    Left = 154
    Top = 154
    Width = 6
    Height = 13
    Caption = '0'
  end
  object Edit1: TEdit
    Left = 14
    Top = 42
    Width = 50
    Height = 21
    TabOrder = 0
    Text = 'Edit1'
  end
  object CheckBox1: TCheckBox
    Left = 14
    Top = 84
    Width = 97
    Height = 17
    Caption = 'LED3'
    TabOrder = 1
    OnClick = CheckBox1Click
  end
  object CheckBox2: TCheckBox
    Left = 14
    Top = 119
    Width = 97
    Height = 17
    Caption = 'LED4'
    TabOrder = 2
    OnClick = CheckBox2Click
  end
  object ProgressBar1: TProgressBar
    Left = 168
    Top = 14
    Width = 15
    Height = 155
    Min = 0
    Max = 100
    Orientation = pbVertical
    Smooth = True
    TabOrder = 3
  end
  object ComPort1: TComPort
    BaudRate = br19200
    Port = 'COM4'
    Parity.Bits = prNone
    StopBits = sbOneStopBit
    DataBits = dbEight
    Events = [evRxChar, evTxEmpty, evRxFlag, evRing, evBreak, evCTS, evDSR, evError, evRLSD, evRx80Full]
    FlowControl.OutCTSFlow = False
    FlowControl.OutDSRFlow = False
    FlowControl.ControlDTR = dtrDisable
    FlowControl.ControlRTS = rtsDisable
    FlowControl.XonXoffOut = False
    FlowControl.XonXoffIn = False
    OnRxChar = ComPort1RxChar
    Left = 77
    Top = 133
  end
end