Wie erkennen, ob Drucker Farb- oder Schwarzweißdrucker ist?

[BlueStarHH]

Hallo,

wie kann ich ermitteln, ob der aktuelle Drucker ein Farb- oder Schwarzweißdrucker ist?

Ich nutze die Unit Printers und setze den aktuellen Drucker mit Printer.PrinterIndex := X

Vielen Dank im Voraus!

[Bolt Thrower]

Hallo BlueStarHH,

vielleicht hilft Dir ja dieser Link von den Schweizern weiter (hab's selber nicht getestet)?

Grüße,

Bolt Thrower

[himitsu]

das Printerobjekt hat IMHO auch Eigenschaften für die Anzahl der Farben und wieviel Bits für diese zur verfügung stehen.

2 Farben = SwarzWeiß
8 echte Mischfarben = 3 Farbpatronen
usw.

Wenn du es nicht findest, kann ich daheim ma 'ne alte Demo raussuchen.

*Notiz an mich selber ... ich sollte solche Dinge och ma mit auf'm USB-Stick ablegen*

[Union]

Ich würd's so machen (nicht elegant, aber ich brauche ein Startdoc für den DC):

Delphi-Quellcode:

function GetPrinterNumColors(Printername : string)
var
   i : integer;
begin
   result := -1;
   i := Printer.Printers.IndexOf(Printername);
   if i > 0 then
   begin
      Printers.Printer.PrinterIndex := i;
      Printers.Printer.BeginDoc;
      result := GetDeviceCaps(Printers.Printer.Canvas.Handle, NUMCOLORS);
      Printers.Printer.Abort;
   end;
end;

[andreash]

Hallo!

Ein Funktion dafür steht auch hier: http://www.dsdt.info/tipps/?id=346

Ich habe sie allerdings noch nicht verwendet.

[Union]

Zitat:

Ein Funktion dafür steht auch hier: http://www.dsdt.info/tipps/?id=346

Wie immer war das natürlich die einfachere Lösung.. Ich würde dennoch mit NUMCOLORS arbeiten: Alles > 2 ist Farbe. Es sei denn, mann hat einen Rot/Grün-Drucker ;)

[BlueStarHH]

Danke für die vielen Antworten. Es gab 3 Lösungsvorschläge, die ich auf ihre Tauglichkeit untersucht habe.

Zur function GetPrinterNumColors(Printername : string)
Unter Windows XP wird durch diese Funktion das Druckerstatusfenster für den Bruchteil einer Sekunde geöffnet. Außerdem erscheint kurz das Druckersymbol im Tray und in der Taskleist. Bei einem virtuellen Druckertreiber (PDF-Konverter von Context), bleibt das Druckerstatusfenster über 10 Sekunden geöffnet. Diese Funktion sollte daher nicht genutzt werden.

Die beiden anderen Funktionen habe ich in ein kleines Testprojekt aufgenommen. Dieses Projekt erzeugt die folgende Tabelle. In der ersten Spalte sind die Namen der Drucker zu sehen.
Spalte SW1a: Ist der Drucker laut Funktion 1a ein Schwarzweißdrucker?
Spalte SW1a: Ist der Drucker laut Funktion 1b ein Schwarzweißdrucker?
Spalte SW2: Ist der Drucker laut Funktion 2 ein Schwarzweißdrucker?
Spalte *: Von mir angegeben, ob es sich wirklich um einen Schwarzweißdrucker handelt.

Delphi-Quellcode:

Drucker                       SW1a SW1b SW2  *
Canon iP4200..................N    N    N    N
pdfFactory ...................N    N    N    N
pdfFactory Pro................N    N    N    N
Kyocera FS-680................J    N    J    J
Kyocera FS-3750 KX............N    N    J    J
FRITZfax......................N    J    J    J
FinePrint.....................N    N    N    N
Canon i865....................N    N    N    N
BroadGun pdfMachine...........N    N    N    N
Adobe PDF.....................N    N    J    N

Wie man an der Tabelle sehen kann trifft keine der Funktionen in jedem Fall die Realität. Können einge von euch dieses Testprogramm hier herunterladen und die Ergebnisse hier posten? Damit man weiß, welche dieser Funktionen am zuverlässigsten ist. Danke!

[fkerber]

Hi!

Delphi-Quellcode:

Drucker                       SW1a SW1b SW2  
Office Document Image Writer..N    N    N    
Kyocera FS-920 KX.............N    N    J    
Kyocera FS-920................J    N    J    
FRITZfax Drucker..............J    N    J    
FRITZfax Color Drucker........N    N    N    
FreePDF XP....................N    N    J    
Canon PIXMA iP4000............N    N    N    
Adobe PDF.....................N    N    J

Kyocera ist SW-Laser, Canon ist Farbdrucker, Rest sollte sich erklären!

Die GetPrinterNumColors kann man etwas umbauen, sodass das von dir beschriebene Verhalten entfällt, allerdings ist laut ihr (vor und nach Umbau) mein SW-Laser ein Farbdrucker!


Ciao, Frederic

[andreash]

Von der Methode GetPrinterNumColors kann ich auch abraten. Ich verwende sie in unseren Programmen schon sehr lange. Seit Windows XP tritt das Problem auf, dass Schwarzweissdrucker als Farbdrucker identifiziert werden.

[himitsu]

Es wäre vielleicht auch mal nicht schlecht, wenn du mit einbeziehst, ob eventuell die Funktionen garkein Ergebnis (oder halt ein Falsches) zurückliefern.

Delphi-Quellcode:

Bits   := GetDeviceCaps(Printer.Handle, BITSPIXEL);
Planes := GetDeviceCaps(Printer.Handle, PLANES);
If (Planes = 1) and (Bits = 1) Then Result := Monocrome
Else If (Planes = 1) and (Bits > 1) Then Result := GrayScale
Else If (Planes > 1) and (Bits > 1) Then Result := Color
Else Result := Error;

Delphi-Quellcode:

Colors := GetDeviceCaps(Printer.Handle, NUMCOLORS);
If Colors > 2 Then Result := ColorOrGrayScale
Else If Colors = 2 Then Result := Monocrome
Else Colors < 2 Then Result := Error;

Zu den Schweizern, ich weiß nicht was das mit dem >1 bei .dmColor auf sich hat, aber dort gibt es keine "Farbanzahl" ... nur DMCOLOR_COLOR, oder DMCOLOR_MONOCHROME.
DocumentProperties > http://msdn.microsoft.com/library/de...tspol_7k1f.asp

Laut MSDN sähe es dann also so aus :gruebel:

Delphi-Quellcode:

Var DM: PDeviceMode;

Begin
  GetMem(DM, DocumentProperties(0, Printer.Handle, nil, nil, nil, 0));
  Try
    DocumentProperties(0, Printer.Handle, nil, DM, nil, DM_OUT_BUFFER);
    If DM1^.dmColor = DMCOLOR_COLOR Then Result := Color
    Else Result := Monocrome;
  Finally
    FreeMem(DM);
  End;
End;

[SnuffMaster23]

Also das musste ich doch grad auch mal ausprobieren:

Code:

Fujitsu DL 3400...............J    N    J

Tja, der ist je nach Farbband und Treiber in S/W oder Farbdrucker...
Erst seit WinXP weiß ich dass der Farbe kann (mit nem Farbband für ca. 30 engl. Pfund).

Also kann eigentlich kein Programm eine zuverlässige Aussage treffen.

[himitsu]

Diese Dinge lesen ja alle die TreiberInfos aus und fragen nicht direkt beim Drucker an, was der kann.

Wenn jetzt der Treiber aber auch Farbe entgegennimmt und es dann in SchwarzWeiß umrechnet, dann können diese Abfragen nur von 'nem Farbdrucker ausgehen.

Oder der Treiber/die Schnittstelle zu diesem liefet einfach die falschen Werte ... soll ja alles vorkommen ;)

[Martin K]

Hab auch mal getestet:

Code:

Drucker                       SW1a SW1b SW2  
PDF Printer...................N    N    N    
HP DeskJet 930C...............J    N    J

Also der HP DeskJet 930C ist definitiv ein Farbdrucker.
Auch die Treiber sind für Farbe.
Ich habe lediglich in der Systemsteuerung unter Druckeigenschaften festgelegt, dass er Schwarzweiß drucken soll...

[himitsu]

Zitat:

Zitat von Martin K

Ich habe lediglich in der Systemsteuerung unter Druckeigenschaften festgelegt, dass er Schwarzweiß drucken soll...

Ohh, dat kommt ja och noch mit dazu,

also was der drucker könnte und was er tatsächlich nur macht.

[Martin K]

Zitat:

Zitat von himitsu

Zitat:

Zitat von Martin K

Ich habe lediglich in der Systemsteuerung unter Druckeigenschaften festgelegt, dass er Schwarzweiß drucken soll...

Ohh, dat kommt ja och noch mit dazu,

also was der drucker könnte und was er tatsächlich nur macht.

Wobei man dies bei jedem Druckvorgang ändern kann.
Das in der Systemsteuerung sind lediglich die Standardeinstellungen, also wenn man einfach nur drucken will und im Druckdialog nix ändert.

//Edit:
Wobei aber Treiber und Drucker selbst Farbe ist...
Also warum dann dies? :gruebel:

Code:

HP DeskJet 930C...............J    N    J

[BlueStarHH]

Zitat:

Zitat von Martin K

Wobei aber Treiber und Drucker selbst Farbe ist...
Also warum dann dies? :gruebel:

Code:

HP DeskJet 930C...............J    N    J

Weil Du in den Druckereinstellungen auf Schwarzweiß gestellt hast? Stelle bitte mal auf Farbe und teste dann nochmal mit dem Testprogramm.

[himitsu]

Zitat:

Zitat von Martin K

Wobei aber Treiber und Drucker selbst Farbe ist...
Also warum dann dies? :gruebel:

Wenn du den "Drucker" auf SW einstellst, dann sollte der Treiber auch als SW-Treiber laufen.

Oder zumindestens sollte er dann behaupten er sei eine Schnittstelle zu 'nem SW-Drucker, denn Farbe kann er ja nicht in diesem Modus drucken.

Und irgendwoher müssen die Programme doch dann wissen, daß sie über diesen Druckertreiber nur SW drucken können.

[Martin K]

Jo, so scheint es zu sein.
Wenn ich in der Systemsteuerung auf Farbe umstelle:

Code:

Drucker                       SW1a SW1b SW2  
PDF Printer...................N    N    N    
HP DeskJet 930C...............N    N    N