TModBusTCPConnection.ReadHoldingRegisters
| TModBusTCPConnection = class (TObject) | Interface de TModBusTCPConnection | Exemples de TModBusTCPConnection |
Qubes 6.0 Lecture de plusieurs registres de maintien consécutifs
Syntaxe
function ReadHoldingRegisters(startingAddress: Integer; nbWords: Integer; lstWords: TIntegerList): Boolean
startingAddress: numéro du premier registre lu (entre 0 et 65535)
nbWords: nombre de registres à lire (entre 1 et 125)
lstWords: liste qui contiendra les nbWords entiers 16-bits lus
Remarques
Lecture d'une liste de Holding Registers.
La TIntegerList lstWords contiendra les nbWords mots de 16-bits lus.
La fonction renvoie True si la lecture s'est bien passée.
Pour lire un seul registre, il est plus simple d'utiliser ReadHoldingRegister.
Exemples
uses SysUtils, Networking.Modbus;
var lst := new TIntegerList;
var mdb:=TModBusTCPConnection.Connect('192.168.0.32');
Sleep(500);
if mdb.Connected then begin
mdb.ReadHoldingRegisters(0, 10, lst);
Print(lst.AsString); // Affiche les 10 entiers, séparés par des ;
end;
var lst := new TIntegerList;
var mdb:=TModBusTCPConnection.Connect('192.168.0.32');
Sleep(500);
if mdb.Connected then begin
mdb.ReadHoldingRegisters(0, 10, lst);
Print(lst.AsString); // Affiche les 10 entiers, séparés par des ;
end;