J’ai encore un petit soucis, débutant sous DELPHI, j’ai du mal avec les pointeurs.
Voici ce que j’aimerais utiliser :
Type
PWord = ^TWordFrame;
TWordFrame = Packed Array[0..127] Of Word;
et je souhaite utiliser la fonction
TMbReadHoldingRegisters = Function (
Handle : THEntry; // Handle de connexion.
Slave : Byte ; // Numéro d'esclave ModBus. En général, 0 en TCP/IP.
Address : Word ; // Adresse ModBus source.
Count : Word ; // Nombre de mots à lire.
Data : PWord // Pointeur sur un tableau de retour. Doit être déjà alloué.
) : Integer ; // Vaut zéro en cas de succès, ou égal au numéro d'exception ModBus en cas d'erreur. Vaut (-1) en cas de timeout.
StdCall;
Le probléme c’est que je ne sait pas vraiment comment allouer la mémoire pour le PWord voila ce que j’ai fait pour utiliser la fonction:
var
listedesmots:PWord;
valeur:integer;
begin
new(listedesmots);
MbReadHoldingRegisters(communication,0,90,25,listedesmots);
....
Mais je ne pense pas avoir correctement allouer la mémoire pour listedesmots
Votre aide me serait utile. Merci :??: