Delphi串口编程入门示例
本示例展示了如何用Delphi进行简单的串口编程,包括源码和推荐工具的使用方法。适合初学者参考实践。
代码:
```delphi
uses
SysUtils, Classes;
var
SerialPort1: TSerialPort;
procedure TForm1.FormCreate(Sender: TObject);
begin
SerialPort1 := TSerialPort.Create('COM1');
SerialPort1.BaudRate := 9600;
SerialPort1.DataBits := 8;
SerialPort1.StopBits := tspOneStop;
SerialPort1 Parity := spNone;
end;
代码:
```delphi
uses
SysUtils, Classes;
var
SerialPort1: TSerialPort;
procedure TForm1.FormCreate(Sender: TObject);
begin
SerialPort1 := TSerialPort.Create('COM1');
SerialPort1.BaudRate := 9600;
SerialPort1.DataBits := 8;
SerialPort1.StopBits := tspOneStop;
SerialPort1 Parity := spNone;
end;
718.66KB
文件大小:
评论区