MODBUS-enheder R / W data adgang med [MBusDrv.dll] bibliotek.
Eksporterede funktioner (pascal deklarationer):
{* Standard læsedata fra MODBUS-enhed *}
funktion GetMBData (const SlaveAddr: byte; const ReadType: boolean; var Data: array [0..254] byte): heltal; stdcall;
SlaveAddr: byte (1..254)
ReadType: boolean (false = Coils / true = Holding Registers)
Data: array [0..254] af byte (enhedsdata)
Returner heltal (0 = OK)
{* Udvidede læsedata fra MODBUS-enhed *}
funktion GetMBDataEx (const SlaveAddr: word; const ReadType: word): pointer; stdcall;
SlaveAddr: ord (1..254)
ReadType: word (0 = Coils / 1 = Holdingregistre)
Returpeger på 255 byte (enhedsdata eller 0 = Fejl)
{* VBA (Microsoft Visual Basic) læse data fra MODBUS-enhed *}
funktion GetMBDataVBA (const SlaveAddr: LongInt; const ReadType: LongInt): pointer; stdcall;
SlaveAddr: longint (1..254)
ReadType: longint (0 = Coils / 1 = Holdingregistre)
Returpeger på 255 byte (enhedsdata eller 0 = Fejl)
{* Standard skrive data til MODBUS enhed *}
funktion PutMBData (const SlaveAddr: byte; const SkrivType: boolsk; const DataAddr: byte; const Data: ord): heltal; stdcall;
SlaveAddr: byte (1 ..254)
WriteType: boolean (false = Coil / true = Holding Register)
DataAddr: byte (1..255)
Data: ord
Returner heltal (statuskode> = 0 = OK)
{* VBA (Microsoft Visual Basic) skrive data til MODBUS enhed *}
funktion PutMBDataVBA (const SlaveAddr: longint; const SkrivType: longint; const DataAddr: longint; const Data: longint): longint; stdcall;
SlaveAddr: longint (1..254)
WriteType: longint (0 = Coil / 1 = Holding Register)
DataAddr: longint (1..255)
Data: longint
Return longint (statuskode> = 0 = OK)
Kommentarer ikke fundet