ZVT-Protokoll & APRO Comport

[masterchris_99]

Hi,

ja das hatte ich gestern schon geändert. Der Port wird erst geschlossen wenn das Prog beendet wird.
Und Daten lese ich mit einem Extra Tool was den Port überwacht und mir alles ausgibt.

Laut der Antwort: http://www.vb-magazin.de/forums/foru...129.aspx#20129

Müsste das Terminal so ansprechbar sein:

Code:

Kasse ® ZVT       10 02 06 00 04 28 00 11 38 10 03 1C A2     das unterstrichen ist der Befehl von Oben

ZVT ® Kasse       06

ZVT ® Kasse       10 02 80 00 00 10 03 F5 1F

Kasse ® ZVT       06
 

ZVT ® Kasse       10 02 06 0F 00 10 03 C6 33

Kasse ® ZVT       06

Kasse ® ZVT       10 02 80 00 00 10 03 F5 1F

ZVT ® Kasse       06

Aber bei mir kommt keine Antwort...

Der Quellcode sieht jetzt so aus:

Delphi-Quellcode:

var daten, strBefehl: String;
begin
  daten := Chr(6) + Chr(0) + Chr(4) + Chr(0) + Chr(0) + Chr(0) + Chr(56);
  strBefehl := Chr(16) + Chr(2) + daten + Chr(16) + Chr(3) + Chr(28) + Chr(162);

  //strBefehl := Chr(16) + Chr(2) + Chr(6) + Chr(1) + Chr(10) + Chr(4) + Chr(0) + Chr(0) + Chr(0) +
  //Chr(0) + Chr(21) + Chr(0) + Chr(73) + Chr(9) + Chr(120) + Chr(16) + Chr(3) + Chr(160) + Chr(116);

  try
    com_ec.PutString(strBefehl);
    Application.ProcessMessages;
  except
    //com_ec.DonePort;
    Application.ProcessMessages;
  end;
end;