Drucker Daten abfangen

[jacky213]

Also ich habe mir einen Adapter von RJ12 auf USB besorgt und diesen einfach an meinen PC angeschlossen um zu schauen was für Daten ankommen.

Mit einem Tool habe ich mir die Raw Daten vom USB Port angeschaut und er scheint die Informationen im Klartext auszugeben.

Delphi-Quellcode:

0d 0a 44 65 6e 6f 20 20 20 20 20 20 20 50 63 73
20 20 20 20 56 61 6c 75 65 20 0d 0a 2d 2d 2d 2d
2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d
2d 2d 2d 2d 0d 0a 45 75 72 6f 35 20 20 20 20 20
20 20 20 31 20 20 20 20 20 20 20 20 35 0d 0a 45
75 72 6f 31 30 20 20 20 20 20 20 20 31 20 20 20
20 20 20 20 31 30 0d 0a 45 75 72 6f 32 30 20 20
20 20 20 20 20 31 20 20 20 20 20 20 20 32 30 0d
0a 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d
2d 2d 2d 2d 2d 2d 2d 2d 2d 0d 0a 20 20 20 20 20
20 20 20 20 20 20 20 20 33 20 20 20 20 20 20 20
33 35 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a 0d 0a
0d 0a 0d 0a 0d 0a

Wenn ich diese Werte nun von Hex auf Text umwandel kommt genau das dabei raus was ich
benötige.

Delphi-Quellcode:

Deno       Pcs    Value 
------------------------
Euro5        1        5
Euro10       1       10
Euro20       1       20
------------------------
             3       35

Ich habe herausgefunden das ich mittels JvHIDController Daten über USB empfangen kann,
allerdings finde ich keine Vendor oder Produkt ID. Wie gehe ich da weiter vor?

[TurboMagic]

Zitat von jacky213:

Ich habe herausgefunden das ich mittels JvHIDController Daten über USB empfangen kann,
allerdings finde ich keine Vendor oder Produkt ID. Wie gehe ich da weiter vor?

HID ist ein Tastatur/Maus Profil von USB, was du hast ist aber etwas serielles. Also tut es die Jvcl Komponente vermutlich nicht.

[HolgerX]

Hmm..

Die meisten Seriell auf USB Adapter werden unter Windows als Serielle (COMx) Schnittstelle installiert und dann kannst Du mit einer ComPort-Komponente darauf zugreifen und auslesen.

Schau mal im Gerätemanager, ob da nen weiterer COM-Port installiert ist..

Es gibt diverse Komponenten für Delphi und ComPort, einfach mal googeln...

[jacky213]

So ich habe mir die Comport Komponente installiert. COMPORT 4 geöffnet und mittels folgendem Code alle empfangenen Daten in ein Memo ausgegeben.

Delphi-Quellcode:

var Output:string;
begin
ComPort1.ReadStr(Output,Count);
memo1.Lines.Add(Output);
end;

Das funktioniert alles und ich bekomme auch die gewünschten Informationen. Allerdings nicht
in Hex Werten, sondern direkt in Textform, der dann aber vollkommen verunstaltet wurde.


Zum Beispiel:

Delphi-Quellcode:

Den
o Pcs 
Value 
-----
-------
---------
---
Eur
o5 1 5
Euro10 1 
10
Euro
20 1 20
------
--------
------
----
            3 
35

Wie bekomme ich da Ordnung rein?

[Schokohase]

Du bekommst die Daten als Bytes geliefert.

Du verlangst von der Komponente dir diese Bytes als Text zu interpretieren und dir zurückzugeben.

Egal ob jetzt als Text oder als HEX, es ist eine Frage der Darstellung und nicht der Daten.

[jacky213]

Sehr geil, danke an alle!

[Luckie]

Ich hatte mal für mal für meinen Arbeitgeber was ähnliches programmiert. Und zwar sollten Dokumente die zum Drucker geschickt worden automatisch in ein Dokumentenverwaltungssystem eingepflegt werden. Das lief so, dass der Drucker(treiber) so eingestellt, war dass er das Dokument nicht nur zum Drucker geschickt hat, sondern gleichzeitig das Dokument als Druckdatei auf einem Ordner auf dem Netzlaufwerk abgelegt hat. Ich musste mich also niergens dazwischen hängen, sondern nur (regelmäßig) gucken, ob neue Druckdateien in dem Ordner vorliegen. Diese habe ich dann geparst, um entsprechende Stichworte das Dokumentenverwaltungssystem zu bekommen zum einsortieren.

Wäre das eine Option für dich?