Discussion :

[manukatz]

Bonjour,
J'utilise une version7 de delphi et je souhaite communiquer avec un DIRIS A41.
Je peux envoyer et reçevoir des données en hexa avec un freeware type hyperterminal sans PB.

Je souhaiterais envoyer des données au format Hexadécimal avec le composant Tcomport et une interface développée en Delphi.
J'ai déjà utilisé ce composant à plusieurs reprises mais avec des chaines de caractères ASCII.
Si quelqu'un a une idée ?

Voici le bout de code... qui n'est pas fini (j'imagine qu'il manque certaines choses ???)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
procedure TForm1.Button4Click(Sender: TObject);
var
  Str: String;
begin
  Str := '05030700000B04FD' ;
  ComPort1.WriteStr(Str);
end;

Merci de vos réponses..

Manu.

[Linkin]

Dans ce code tu envoie des caractères ASCII et non de l'hexadécimal. Si tu veux garder le WriteStr, tu peux faire:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
  Str:=#05+#03+#07+#00+#00+#11+#04+#254

Sinon il faut passer par TComport.Write avec un array of byte.