delphi 10串口通信

### Delphi 10 串口通信示例教程

#### 使用 SPCOMM 控件进行串口通信

为了在 Delphi 10 中实现高效的串口通信，可以利用 `SPCOMM` 组件库。此组件库提供了简单易用的方法来进行串口操作，并支持多种功能特性。

安装并配置好 `SPCOMM` 后，在应用程序中创建一个新的窗体并将所需的控件放置到设计界面上。对于基本的发送和接收数据的功能来说，通常会涉及到以下几个主要部分：

- **打开/关闭端口**

可通过设置属性来指定要使用的COM端口号以及波特率等参数，之后调用相应的方法完成开启或停止连接的操作。

procedure TForm1.OpenPortButtonClick(Sender: TObject);
begin
  if not SpComm1.PortOpen then
    try
      with SpComm1 do begin
        Port := 'COM' + EditCom.Text;
        BaudRate := StrToInt(EditBaudrate.Text);
        DataBits := StrToInt(EditDatabits.Text);
        StopBits := TStopBits(StrToInt(EditStopbits.Text));
        ParityBit := TParityBit(StrToInt(EditParitybit.Text));
        FlowControl := TFlowControl(StrToBool(CheckBoxRTS.Checked), StrToBool(CheckBoxDTR.Checked));

        Open; // 打开端口
      end;

      MemoLog.Lines.Add('成功打开了串口');
    except on E: Exception do
      ShowMessage(E.Message);
    end;
e