delphi 通过调用系统api来直接读写串口。