VB6 Professional SP6: Fehler durch Printer.PrintQuality = 0

Question

Hallo zusammen.

Bei der Programmierung einer Seitenansicht verwende ich zur Berechnung der physikalisch verfügbaren Papier-Fläche die PrintQuality-Eigenschaft des Printer-Objekts.
Scheinbar gibt es Printer-Objekte (hier: "FRITZfax Drucker" ,v3.04), die den Wert der PrintQuality-Eigenschaft gar nicht bzw. 0zurückgeben, was dann bei der Berechnung zu dem Fehler "Division durch Null" führt.

Kennt jemand eine Methode, mit der man den Wert der PrintQuality-Eigenschaft berechnen kann?

Vielen Dank für Eure Hilfe

VG
C. Mehnert