ESC / P - Seitenlänge in Millimeter übergeben (Epson LQ2190)

[himitsu]

Delphi-Quellcode:

N := 2;
M := ...;
S := ESC + '(C' + Chr(N mod 256) + Chr(N div 256) + Chr(M mod 256) + Chr(M div 256); 

// oder

type
  TPageLength = packed record
    C: array[0..2] of AnsiChar;
    N, M: Word;
  end;

PageLength.C := ESC + '(C';
PageLength.N := 2;
PageLength.M := ...;
// jetzt nur noch den Record versenden

und nun mußt du nur noch anhand der Formel bestimmen wie groß N und M sein sollen.

Aber frag mich nicht wie groß eine "Unit" sein soll.

PageLength := M * N; wirst du ja vermutlich schaffen umzustellen

Zitat:

This command is available only on printers featuring ESC/P 2.

ist gegeben?