记下在优快云上的第一篇笔记 {*******************************************************}{                                                                                            }{       陈新光                  

procedure EnumComPorts(Ports: TStrings);var  KeyHandle: HKEY;  ErrCode, Index: Integer;  ValueName, Data: string;  ValueLen, DataLen, ValueType: DWORD;  TmpPorts: TStringList;begin  ErrCode := RegOpen

var i , x : Integer ;    y :array[0..17] of byte ;begin   y[0] := $fe ;   y[1] := $fe ;   y[2] := $fe ;   y[3] := $fe ;   y[4] := $68 ;   y[5] := $99 ;   y[6] := $99 ;   y[7] := $99 ;   y[8] := $99 ; 

SPCOMM的属性、方法和事件1.属性●CommName：表示 COM1、 COM2等串口的名字；●BaudRate:根据实际需要设定的波特率，在串口打开后也可更改此值，实际波特率随之更改；●ParityCheck：表示是否需要奇偶校验；●ByteSize：根据实际情况设定的字节长度；●Parity：奇偶校验位；●StopBits：停止位；●SendDataEmpty：这是一个布尔型属性，为 tr