Kassenlade öffnen

**mkinzler**

Warum nicht einfach p := PAnsiChar( acmd); ?

**Natcree**

Okay das funcktioniert schonmal jetzt meckert er hier

rawdatatoprinter(pwidechar('CognitiveTPG Receipt'),pbyte(p),length(acmd)); invalid typcast

**mkinzler**

Bei welchem Parameter?
Ein Zeiger auf eine Konstante ist schlecht

**Natcree**

ich denke mal pbyte

**mkinzler**

Das sollte der Compiler aber Anzeigen.

**Natcree**

ja er setzt den cursor vor pbyte(p)

**mkinzler**

Versuch mal nur p oder PByte(acmd)

Es ist schon ein paar Jahrzehnte her, aber damans brauchte man einfach nur ein "BELL" Steuerzeichen auf den Kassendrucker "drucken" und dieser hat dann die Schublade geöffnet.

http://de.wikipedia.org/wiki/Bell_(Steuerzeichen)
Das war sehr einfach und klappt vielleicht heute auch noch?

Nimm den OPOS-Treiber und mach das darüber. Ist nicht so ganz trivial... aber eigentlich schon.

**Natcree**

so habe jetzt ne lösung jedoch druckt er einen schnippsel mit aus

SendEscapeToPrinter('CognitiveTPG Receipt','ESC p m t1 t2') Das druckt er aus wie bekomme ich es weg.
'ESC p m t1 t2'

Kassenlade öffnen

AW: Kassenlade öffnen

AW: Kassenlade öffnen

AW: Kassenlade öffnen

AW: Kassenlade öffnen

AW: Kassenlade öffnen

AW: Kassenlade öffnen

AW: Kassenlade öffnen

AW: Kassenlade öffnen

AW: Kassenlade öffnen

AW: Kassenlade öffnen

Forumregeln

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.882 Beiträge Delphi 11 Alexandria	#1 AW: Kassenlade öffnen 21. Jun 2014, 11:44 Warum nicht einfach p := PAnsiChar( acmd); ? Markus Kinzler
	Zitat

Natcree Registriert seit: 5. Mär 2013 502 Beiträge Delphi 7 Enterprise	#2 AW: Kassenlade öffnen 21. Jun 2014, 11:49 Okay das funcktioniert schonmal jetzt meckert er hier rawdatatoprinter(pwidechar('CognitiveTPG Receipt'),pbyte(p),length(acmd)); invalid typcast
	Zitat

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.882 Beiträge Delphi 11 Alexandria	#3 AW: Kassenlade öffnen 21. Jun 2014, 11:52 Bei welchem Parameter? Ein Zeiger auf eine Konstante ist schlecht Markus Kinzler
	Zitat

Natcree Registriert seit: 5. Mär 2013 502 Beiträge Delphi 7 Enterprise	#4 AW: Kassenlade öffnen 21. Jun 2014, 11:54 ich denke mal pbyte
	Zitat

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.882 Beiträge Delphi 11 Alexandria	#5 AW: Kassenlade öffnen 21. Jun 2014, 11:55 Das sollte der Compiler aber Anzeigen. Markus Kinzler
	Zitat

Natcree Registriert seit: 5. Mär 2013 502 Beiträge Delphi 7 Enterprise	#6 AW: Kassenlade öffnen 21. Jun 2014, 12:08 ja er setzt den cursor vor pbyte(p)
	Zitat

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.882 Beiträge Delphi 11 Alexandria	#7 AW: Kassenlade öffnen 21. Jun 2014, 12:44 Versuch mal nur p oder PByte(acmd) Markus Kinzler
	Zitat

jensw_2000 (Gast) n/a Beiträge	#8 AW: Kassenlade öffnen 21. Jun 2014, 16:17 Es ist schon ein paar Jahrzehnte her, aber damans brauchte man einfach nur ein "BELL" Steuerzeichen auf den Kassendrucker "drucken" und dieser hat dann die Schublade geöffnet. http://de.wikipedia.org/wiki/Bell_(Steuerzeichen) Das war sehr einfach und klappt vielleicht heute auch noch?
	Zitat

Dejan Vu (Gast) n/a Beiträge	#9 AW: Kassenlade öffnen 22. Jun 2014, 10:08 Nimm den OPOS-Treiber und mach das darüber. Ist nicht so ganz trivial... aber eigentlich schon.
	Zitat

Natcree Registriert seit: 5. Mär 2013 502 Beiträge Delphi 7 Enterprise	#10 AW: Kassenlade öffnen 23. Jun 2014, 13:03 so habe jetzt ne lösung jedoch druckt er einen schnippsel mit aus SendEscapeToPrinter('CognitiveTPG Receipt','ESC p m t1 t2') Das druckt er aus wie bekomme ich es weg. 'ESC p m t1 t2'
	Zitat