Hallo,
Es liegt weden am Treiber der Hersteller noch mach Delphi einen Fehler !
Das Problem ist, das eine Punktline wie Folgt zusammen gesetzt ist :
<Pixel in Farbe><Pixel in Weis/Transparent><Pixel in Farbe><Pixel in Weis/Transparent>...
So wenn dun nun eine Punktlinie auf deinem Bildschirm zeichnest dann arbeitest Du mit 96 DPI, sprich 96 Pixel auf einen Zoll (ungefähr 3 Pixel pro mm). Bei dieser Auflösung 'siehst Du die Farbigen Pixel und kannst sie von den nichtgezeichneten unterscheiden.
Beim Drucker sieht das etwas anders aus:
Je nach Druckertyp sind es im Normalmodus derzeit ca 1200 DPI (ungefähr 47 Pixel pro mm). Die Pixel sind nun so klein, das der Abstand einfach zu gering ist, um die farbigen von den weißen mit bloßen Augen zu unterscheiden !!
Im Entwurfmodus arbeiten die meisten Drucker mit einer geringeren DPI-Zahl (z.B. 150 DPI).
Ändere dein
Printer.Canvas.Pen.Width := 1;
mal in
Printer.Canvas.Pen.Width := 10;
und schau dir das Ergebnis an !
Um eine Gleichbleibende Punktlinie auf verschiedenen Druckern zu erhalten, solltest Du nun vor dem Zeichnen einen aus der Druckerauflösung akzeptablen Wert errechen, bei dem die Punkte erkennbar sind !!!
Schauii...
Holger