Delphi-PRAXiS - Delphi Druckerspezifischer Rand

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)

- - Delphi Druckerspezifischer Rand (https://www.delphipraxis.net/86158-druckerspezifischer-rand.html)

Druckerspezifischer Rand

Hallo,

ich möchte über eine VCL-Anwendung mit TPrinter etwas drucken.
Das funktioniert auch soweit, nur ist nach dem Drucken der Punkt der Canvas (0 | 0) (links oben) nicht ganz links oben auf dem Blatt.
Der Drucker fügt halt noch einen Rand hinzu.

Der Rand wäre nicht das Problem, wenn ich herausfinden könnte, wie groß dieser ist.
Ich möchte genau festlegen können, dass z.B. 3cm von links und 3cm von oben auf dem Blatt Papier ein Punkt ist.
Wenn ich in Word das selbe probier, so ist der Punkt links oben auf dem Dokument auch links oben auf dem Blatt Papier (sieht man nur nicht, ist aber verschoben [Habe "Hallo" geschrieben und es stand "llo" da] ;).

Ich hoffe, ihr habt mein Problem verstanden und vielleicht eine Lösung parat.

Vielen Dank,

Tim

Re: Druckerspezifischer Rand

Herzlich willkommen in der Delphi-PRAXiS, Tim.

Schau dir mal die WinAPI Funktion GetDeviceCaps() an - PHYSICALOFFSETX und PHYSICALOFFSETY sind die Werte, die dich interessieren dürften.

Freundliche Grüße vom marabu

Re: Druckerspezifischer Rand

Hallo,

vielen Dank für die Antwort! Wenn ich das ganze an dem Drucker von mir ausprobiere, gibt die Funktion die richtigen Werte zurück.
Auf dem Drucker, an dem ich es vorher probiert habe, gab die X-Koordinate 1px und die Y-Koordinate 0px zurück...
Weiß einer, woran das liegt.
Beide Drucker sind Netzwerkdrucker.

Tim

Re: Druckerspezifischer Rand

sind beide Drucker vom gleichen Typ? Ich glaube einige Drucker können randlos Drucken, was die Werte erklären würde.