Salut a tous,
Actuellement j'essait de configurer une petite centrale de mesure
Qui me retourne des valeur comme la tension, intensité ...
Mais la docs me demande de transmettre mes demandes a la centrale
en Hexadecimal.
" Modbus RTU protocol "
Ex : 01 03 00 00 00 01 84 0A

Alors j'ai creer un petit programme pour essayer tous sa.
Mais lorsque j'utilise un programme pour sniffer les commande envoyer,
Aucune n'est en Hexa, toute sont convertie car ce que j'envoit
est un String.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
WriteFile(g_hCOM, edit1.text[1], Length(edit1.text[1]), BytesWritten, nil);
J'ai bien essayer sa :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
 
 
var
  BytesWritten: DWORD;
  mBuffer:array[0..100] of Byte;
  i:integer;
begin
  for i:=1 to length(edit2.text) do
  begin
     mBuffer[i]:=ORD(edit2.text[i]);
  end;
 
     WriteFile(g_hCOM, mBuffer, Length(mBuffer), BytesWritten, nil);
Mais identique, pas de changement.

Quelqu'un a t-il une idee ?

Merciiii