Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.063 Beiträge
 
Delphi 12 Athens
 
#7

AW: ecape-sequenz zum drucker

  Alt 8. Okt 2011, 01:18
wie wird denn
Write(t, chr(27) + richtige ESC-Sequenz);
für die genannten seqenzen definiert?
Sowas sollte man aber auch selber übersetzen können. (steht sogar alles Nötige in der OH und ganz am anfang eines ordentlichen Tutorials)

Zitat:
Chr(&H1B)
- das & ignorieren wir einfach
- H = Hexadezimal (und wie gibt man das in Delphi an?)
- genau, mit einem $, also $1B
- und statt über CHR kann man es auch direkt als CHAR-Konstante deklarieren, oder man läßt es so

Chr(&H1B) = Chr($1B) = #$1B

- und das " in Pascal ein ' sein soll, braucht man keinem zu sagen, oder?

"p" = 'p' = #$70 = #112 = CHR(112)

PS: #27 = #$1B = Escape

Zitat:
Delphi-Quellcode:
z. B. Chr(&H1B) + "p" + Chr(&H0) + Chr(&H64) + Chr(&H64)

Aus QBASIC heraus:
PRINT#1,CHR$(27);CHR$(112);CHR$(0);CHR$(50);CHR$(1 50);
Eines von Beiden kann nicht stimmen, denn $64 <> 50 bzw. 150.
$64 (Hexadezimal) = 100 (Dezimal)

#27'p'#0#100#100 (laut dem ersten Code)
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.
  Mit Zitat antworten Zitat