Thiết bị MODBUS R / W datas truy cập với thư viện [MBusDrv.dll].
Các hàm xuất khẩu (khai báo pascal):
{* Tiêu chuẩn đọc dữ liệu từ thiết bị MODBUS *}
chức năng GetMBData (const SlaveAddr: byte; const ReadType: boolean; var Dữ liệu: mảng [0..254] của byte): integer; stdcall;
SlaveAddr: byte (1..254)
ReadType: boolean (false = Coils / true = Holding Register)
Dữ liệu: mảng [0..254] byte (dữ liệu thiết bị)
Trả về số nguyên (0 = OK)
{* Mở rộng dữ liệu đọc từ thiết bị MODBUS *}
hàm GetMBDataEx (const SlaveAddr: word; const ReadType: word): con trỏ; stdcall;
SlaveAddr: word (1..254)
ReadType: word (0 = Coils / 1 = Holding Register)
Trả lại con trỏ 255 byte (số liệu thiết bị hoặc 0 = Lỗi)
{* VBA (Microsoft Visual Basic) đọc dữ liệu từ thiết bị MODBUS *}
hàm GetMBDataVBA (const SlaveAddr: LongInt; const ReadType: LongInt): con trỏ; stdcall;
SlaveAddr: longint (1..254)
ReadType: longint (0 = Coils / 1 = Holding Register)
Trả lại con trỏ 255 byte (số liệu thiết bị hoặc 0 = Lỗi)
{* Tiêu chuẩn ghi dữ liệu tới thiết bị MODBUS *}
chức năng PutMBData (const SlaveAddr: byte; const WriteType: boolean, const DataAddr: byte; const Dữ liệu: word): integer; stdcall;
SlaveAddr: byte (1 ..254)
WriteType: boolean (false = Coil / true = Holding Register)
DataAddr: byte (1..255)
Dữ liệu: word
Trả lại số nguyên (mã trạng thái> = 0 = OK)
{* VBA (Microsoft Visual Basic) ghi dữ liệu vào thiết bị MODBUS *}
chức năng PutMBDataVBA (const SlaveAddr: longint; const WriteType: longint; const DataAddr: longint; const Dữ liệu: longint): longint; stdcall;
SlaveAddr: longint (1..254)
WriteType: longint (0 = Coil / 1 = Holding Register)
DataAddr: longint (1..255)
Dữ liệu: longint
Trả lại longint (mã trạng thái> = 0 = OK)
Bình luận không