[Drucken] Buffergröße reduzieren

[Sunlight7]

Scheinbar kennen Drucker nur Monochrome oder Farbe, zumindest steht in DeviceCapabilities nicht mehr als

Zitat:

dmColor

Switches between color and monochrome on color printers. Following are the possible values:

DMCOLOR_COLOR
DMCOLOR_MONOCHROME

Und egal was ich dem Drucker einstelle, es zeigt immer 24 Bit an.

Delphi-Quellcode:

   var cd:String;
       th:Integer;
begin
   If not PrintDialog1.Execute then
      Exit;

   Printer.BeginDoc;

   Case GetDeviceCaps(Printer.Canvas.Handle, BITSPIXEL) of
       1: cd:='Monochrome';
       4: cd:='16 Farben';
       8: cd:='256 Farben';
      16: cd:='16 Bit High Color';
      24: cd:='24 Bit True Color';
      32: cd:='32 Bit RGBA Color';
      else cd:='Öhm?';
   end;

   Printer.Canvas.Font.Color:=0;
   th:=Printer.Canvas.TextHeight('Bla bla bla');
   Printer.Canvas.TextOut(0, 0, 'Das ist nur ein Test');
   Printer.Canvas.TextOut(0, th, Format('Auflösung: %d x %d', [Printer.PageWidth, Printer.PageHeight]));
   Printer.Canvas.TextOut(0, th * 2, 'Farbtiefe: '+cd);

   Printer.EndDoc;

Was die DPI angeht, das kannst Du per TPrintDialog bzw. TPrintSetupDialog einstellen und ist bei jedem Drucker anders.
Konnte man bei meinm alter Drucker 180, 360 & 720 DPI einstellen heißt es beim neuem dann; Entwurf, Normal, Foto & Optimales Foto.
Wobei es sich dann auch um 180, 360, 720 & 1440 DPI dreht und es mich bei 180 DPI nervt, weil er da immer in den Sparmodus schaltet und kaum sichtbar druckt