Устройства MODBUS Доступ к данным R / W с библиотекой [MBusDrv.dll].
Экспортируемые функции (объявления pascal):
{* Стандартные данные чтения с устройства MODBUS *}
function GetMBData (const SlaveAddr: byte; const ReadType: boolean; var Data: array [0..254] of byte): integer; STDCALL;
SlaveAddr: байт (1..254)
ReadType: boolean (false = Coils / true = регистры хранения)
Данные: массив [0..254] байта (данные устройства)
Возвращаемое целое число (0 = ОК)
{* Расширенные данные чтения с устройства MODBUS *}
функция GetMBDataEx (const SlaveAddr: word; const ReadType: word): указатель; STDCALL;
SlaveAddr: word (1..254)
ReadType: слово (0 = катушки / 1 = регистры хранения)
Возвращаемый указатель 255 байт (данные устройства или 0 = ошибка)
{* VBA (Microsoft Visual Basic) читает данные с устройства MODBUS *}
функция GetMBDataVBA (const SlaveAddr: LongInt; const ReadType: LongInt): указатель; STDCALL;
SlaveAddr: longint (1..254)
ReadType: longint (0 = катушки / 1 = регистры хранения)
Возвращаемый указатель 255 байт (данные устройства или 0 = ошибка)
{* Стандартная запись данных на устройство MODBUS *}
function PutMBData (const SlaveAddr: byte; const WriteType: boolean; const DataAddr: byte; const Data: word): integer; STDCALL;
SlaveAddr: байт (1 ..254)
WriteType: boolean (false = Coil / true = Hold Register)
DataAddr: байт (1..255)
Данные: слово
Возвращаемое целое число (код состояния> = 0 = ОК)
{* VBA (Microsoft Visual Basic) записывает данные в устройство MODBUS *}
function PutMBDataVBA (const SlaveAddr: longint; const WriteType: longint; const DataAddr: longint; const Данные: longint): longint; STDCALL;
SlaveAddr: longint (1..254)
WriteType: longint (0 = катушка / 1 = регистр хранения)
DataAddr: longint (1..255)
Данные: longint
Возврат longint (код состояния> = 0 = ОК)
Комментарии не найдены