启用数据帧识别功能可使收到的数据永远是完整的每帧数据!
单片机开发者再也不用为数据帧首尾识别而烦恼了!
1.支持二进制数据和文本数据的收发
2.支持任意格式的数据的收发
3.支持两种数据包
源代码在线查看: unit1.dfm
object Form1: TForm1
Left = 420
Top = 427
Width = 550
Height = 278
Caption = 'Form1'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
PixelsPerInch = 96
TextHeight = 13
object Memo1: TMemo
Left = 8
Top = 8
Width = 449
Height = 233
HideSelection = False
Lines.Strings = (
'Memo1')
ScrollBars = ssBoth
TabOrder = 0
WordWrap = False
end
object ButtonSend1: TButton
Left = 464
Top = 200
Width = 75
Height = 41
Caption = 'ButtonSend1'
TabOrder = 2
OnClick = ButtonSend1Click
end
object ButtonSet1: TButton
Left = 464
Top = 168
Width = 33
Height = 25
Caption = 'Set'
TabOrder = 1
OnClick = ButtonSet1Click
end
object YbCommDevice1: TYbCommDevice
PortNo = 1
Baud = br115200
ByteSize = 8
InBufSize = 8192
OutBufSize = 8192
HwInSize = 1200
HwOutSize = 1200
QueueSize = 16
PackageSize = 4096
FrameSettings.FrameHead = #0
FrameSettings.FrameTail = #0
FrameSettings.FrameCtrl = #0
Left = 464
Top = 56
end
object Timer1: TTimer
Interval = 100
OnTimer = Timer1Timer
Left = 496
Top = 56
end
end