KRCOMPortConnector.pas

Классы

Класс TKRCOMPortConnector

Родительский класс TKRConnector

Интерфейсы: IKRCOMPortSets

TKRCOMPortConnector – коннектор, осуществляющий связь с удаленным устройством через последовательный порт. Для вывода формы настройки параметров порта можно использовать компонент TKRCOMPortSets. Подробное описание работы с коннекторами можно прочитать в статье «Принцип работы коннекторов в Delphi компонентах».

Свойства класса TKRCOMPortConnector

property Port: String;

Port – имя порта, к которому будет подключаться коннектор

property Parity: integer;

Parity – четность последовательного порта

property StopBits: integer;

StopBits – количество стоп битов последовательного порта

property BaudRate: integer;

BaudRate – скорость последовательного порта

property DataBits: integer;

DataBits – количество битов данных последовательного порта

property FlowControl: TKRFlowControl;

FlowControl – управление потоком последовательного порта

Вход

Комментировать

Вначале новые

Всего комментариев:

Сергей Кинаш

27.04.2021 13:55

Здравствуйте, Руслан.
Возникла такая проблема. Создаю runtime экземпляр класса TKRCOMPortConnector

KRCOMPortConnector1 := TKRCOMPortConnector.Create(nil);
  KRCOMPortConnector1.BaudRate := 115200;
  KRCOMPortConnector1.DataBits := 8;
  KRCOMPortConnector1.FlowControl := krfcNone;
  KRCOMPortConnector1.Parity := NOPARITY;
  KRCOMPortConnector1.StopBits := ONESTOPBIT;
  KRCOMPortConnector1.Port := 'COM13';
...
// далее активирую
  KRCOMPortConnector1.Active := True;
...
// даю время на подключение
    Application.ProcessMessages;
    Sleep(500);
    Application.ProcessMessages;
// и проверяю, что подключился
if KRModbusMaster1.Connector.Stat=cstConnected then ...

Так вот, этот участок кода в VCL Form Applacation работает как надо. Активация проходит: KRModbusMaster1.Connector.Stat=cstConnected

Но если я этот же участок кода помещаю в dll, то
KRModbusMaster1.Connector.Stat = sctNotActive, хотя KRCOMPortConnector1.Active = true

Подскажите пожалуйста что я мог упустить?

Показать полностью

ответить

Руслан Кандирал

27.04.2021 14:15

Сергей Кинаш

Коннектор находится в состоянии sctNotActive до тех пор пока не будет отправлен хотя бы один пакет методом Send. То есть, пока вы ничего ни куда не отправляете, он(коннектор) ничего и не делает.

Показать полностью

ответить

Сергей Кинаш

27.04.2021 14:28

Руслан Кандирал

Я делал по "примеру передачи данных по протоколу Modbus на Delphi". Там явно ничего методом Send не отправляется. Может неявно, не знаю.
Ещё раз напомню, что если запускать этот участок кода из обычного VCL exe-шника, то всё работает. Но если скопипастить его в dll, то sctNotActive, хотя KRCOMPortConnector1.Active = true

Показать полностью

ответить

Руслан Кандирал

27.04.2021 14:37

Сергей Кинаш

Передача данных и подключение выполняются в одной процедуре _exec
https://github.com/kandiral/Kandiral/blo...

Процедура _exec вызывается только в том случае если во входящей очереди коннектора есть хотя-бы одно сообщение(пакет)
https://kandiral.ru/delphi/princip_rabot...

В "пример передачи данных по протоколу Modbus на Delphi" метод Send коннектора вызывается в KRModbusMaster

Получается, что в "обычном VCL exe-шнике" вы что-то отправляете в коннектор, а в DLL нет

Показать полностью

ответить

Сергей Кинаш

27.04.2021 14:41

Руслан Кандирал

Спасибо, будем искать.

Показать полностью

ответить

Руслан Кандирал

27.04.2021 14:06

Сергей Кинаш

Здравствуйте, Сергей!

Какую версию компонентов используете?

Показать полностью

ответить

Сергей Кинаш

27.04.2021 14:15

Руслан Кандирал

от 30.03.2021
RAD Studio 10.2

Показать полностью

ответить

Поиск по сайту

KRCOMPortConnector.pas

Классы

Класс TKRCOMPortConnector

Свойства класса TKRCOMPortConnector

Новости сайта

Популярные статьи

Популярные загрузки