Acesso de dados R / W dos dispositivos MODBUS com a biblioteca [MBusDrv.dll].
Funções exportadas (declarações pascal):
{* Dados de leitura padrão do dispositivo MODBUS *}
função GetMBData (const SlaveAddr: byte; const ReadType: boolean; var Data: array [0..254] de byte): inteiro; stdcall;
SlaveAddr: byte (1..254)
ReadType: boolean (false = Coils / true = Holding Registers)
Dados: matriz [0..254] de byte (dados do dispositivo)
Retornar inteiro (0 = OK)
{* Dados de leitura ampliados do dispositivo MODBUS *}
função GetMBDataEx (const SlaveAddr: palavra; const ReadType: palavra): ponteiro; stdcall;
SlaveAddr: palavra (1..254)
ReadType: word (0 = Coils / 1 = Holding Registers)
Ponteiro de retorno de 255 bytes (dados do dispositivo ou 0 = Erro)
{* VBA (Microsoft Visual Basic) lê dados do dispositivo MODBUS *}
função GetMBDataVBA (const SlaveAddr: LongInt; const ReadType: LongInt): ponteiro; stdcall;
SlaveAddr: longint (1..254)
ReadType: longint (0 = Coils / 1 = Holding Registers)
Ponteiro de retorno de 255 bytes (dados do dispositivo ou 0 = Erro)
{* Dados de gravação padrão no dispositivo MODBUS *}
função PutMBData (const SlaveAddr: byte; const WriteType: boolean; const DataAddr: byte; const Dados: palavra): inteiro; stdcall;
SlaveAddr: byte (1 ..254)
WriteType: boolean (false = Coil / true = Holding Register)
DataAddr: byte (1..255)
Dados: palavra
Retornar inteiro (código de status> = 0 = OK)
{* VBA (Microsoft Visual Basic) gravar dados no dispositivo MODBUS *}
função PutMBDataVBA (const SlaveAddr: longint; const WriteType: longint; const DataAddr: longint; const Data: longint): longint; stdcall;
SlaveAddr: longint (1..254)
WriteType: longint (0 = Coil / 1 = Registro de retenção)
DataAddr: longint (1..255)
Dados: longint
Retornar longint (código de status> = 0 = OK)
Comentários não encontrado