CPORTLIB DELPHI ПРИМЕРЫ
Пример 1: Открытие последовательного порта
Cport := TCPort.Create(Self);
Cport.Device:='COM1';
Cport.BaudRate:=br115200;
Cport.Parity:=None;
Cport.DataBits:=d8;
Cport.StopBits:=sb1;
Cport.FlowControl:=fcNone;
Cport.Open;
Пример 2: Чтение данных из последовательного порта
procedure TForm1.CportRxBuf(Sender: TObject; Count: Integer);
var
S: string;
begin
S := Cport.Read(Count);
Memo1.Lines.Add(S);
end;
Пример 3: Отправка данных в последовательный порт
procedure TForm1.Button1Click(Sender: TObject);
begin
Cport.WriteStr(Edit1.Text);
end;
Пример 4: Закрытие последовательного порта
Cport.Close;
Эти примеры могут помочь в освоении основных возможностей cportlib для работы с последовательным портом в Delphi.
JCLCompression and 7-Zip - Delphi #207
Learn to code in Delphi - Part 8 - Calculator Example
Arduino + Delphi подключение к comport
Install Comport Library Delphi 7
How To Install Delphi Comport Library Or Component
Learn to code in Delphi - Part 1 - Introduction to Delphi Environment
Learn to code in Delphi - Part 4 - Adding code to our project