Работа С Com Портом В Delphi

COM-порт является универсальным интерфейсом для многих устройств, таких как считыватели штрих-кодов, электронные весы, модемы и так далее. Delphi имеет множество встроенных функций для работы с COM-портом.

Сначала необходимо подключить модуль Windows в разделе uses для получения доступа к функциям Windows API. Для открытия COM-порта можно использовать функцию CreateFile(). Пример кода:

  hComm := CreateFile(PChar('COM1'), GENERIC_READ or GENERIC_WRITE,  0, nil, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0);  if hComm = INVALID_HANDLE_VALUE then    RaiseLastOSError; // Порт не удалось открыть

После успешного открытия COM-порта можно настраивать его параметры с помощью функции SetupComm() и EscapeCommFunction(). Пример кода:

  DCB.dcblength := sizeof(DCB);  GetCommState(hComm,DCB);  DCB.BaudRate := CBR_9600;  DCB.ByteSize := 8;  DCB.Parity := NOPARITY;  DCB.StopBits := ONESTOPBIT;  SetCommState(hComm,DCB);  EscapeCommFunction(hComm,SETRTS);  EscapeCommFunction(hComm,SETDTR);

Для чтения и записи данных в COM-порт используются функции ReadFile() и WriteFile(). Пример кода:

  bytesToRead := 10;  SetLength(buf, bytesToRead);  ReadFile(hComm, buf[1], bytesToRead, bytesRead, nil);  bytesToWrite := 5;  SetLength(buf, bytesToWrite);  WriteFile(hComm, buf[1], bytesToWrite, bytesWritten, nil);

После окончания работы с COM-портом его необходимо закрыть. Для этого используется функция CloseHandle(). Пример кода:

CloseHandle(hComm);

Arduino + Delphi подключение к comport

Delphi #171 - Telnet

Микроконтроллер и компьютер через UART - Delphi - Видеоурок

Уроки Arduino #2 - работа с монитором COM порта

how to operate Delphi AutoCom Diagostic Software to Diagnose Mercedes Sprinter w906 2012

COM-порт Delphi7 компонент AsyncFree

РАБОТА С COM ПОРТОМ В DELPHI