Fehler: Nicht genügend Speicher

[Wolfgang Ciriack]

Hallo,

um abzufragen, ob ein bestimmter Drucker zur Verfügung steht, mache ich
aPrinterList := XbpPrinter():New():List()
und durchsuche dann aPrinterList.

Bei ein/zwei PCs bekomme ich da manchmal ein Fehler
Xbase Error.: 15: Nicht genügend Speicher
Sub System..: BASE[1005]
Operation...: ":list"
Can Default.: No
Can Retry...: No
Can Substit.: Yes
Severity....: Error
Cargo.......: [None]
Tries.......: 0
Thread No...: 1

Hat jemand eine Idee, woran das liegen kann oder gibt es eine Alternative ?

[Tom]

Kann es sein, dass es überhaupt keinen Standarddrucker bzw. überhaupt keinen Drucker gibt?

[Wolfgang Ciriack]

Hallo Tom,
dann müsste zwischendurch das komplette Windows-Drucksystem abgestürzt sein - was ich nicht ausschließen kann.
Wenn dem so wäre, wäre diese Fehlermeldung die Folge ?
Aber meist klappt es ja, nur eben irgendwann einmal nicht mehr.

[Tom]

"Nicht genügend Speicher" fällt m.E. in eine ähnliche Kategorie wie "Unzulässige Funktion". Da werden nach meinem Eindruck Fehlerklassen gesammelt, die nicht wirklich zusammengehören (quasi der Restmüll unter den Fehlermeldungen).
Aber es könnte natürlich auch sein, dass wirklich nicht genügend Speicher vorhanden ist. Ich kenne Deine Anwendung nicht, aber ich weiß ja, dass Du mit den Segmentierungseinstellungen (CDF_MOM_MEMORYSPACE_ID usw.) hantierst. Das mache ich allerdings auch - und nach meiner Erinnerung mit ähnlichen Werten. Und unsere Anwendung ist mindestens so groß wie Deine.

Bei mir sieht der Abruf der Druckerliste aber so aus:

Code: Alles auswählen

oPrinter := XbpPrinter():New()
oPrinter:Create("PLATZHALTER FÜR FEHLENDEN DRUCKER")
aList := oPrinter:List()

Vor allem die zweite Zeile diente (früher?) dazu, Fehler zu verhindern, die mit nicht adressierbaren Druckern oder fehlenden Druckern zu tun hatten.

[azzo]

Hallo Wolfgang,
vielleicht könntest du probeweise den Standarddrucker entfernen und dann schauen, ob es beim Drucken diesen Fehler gibt.
LG
Otto

[Wolfgang Ciriack]

Na danke erst mal für die Anregungen, werde demnächst mal testen (Priorität 4711)

[Tom]

Könnte auch das hier sein:

https://www.alaska-software.com/scripts ... PDRID=7292

(Der Fehler tritt auch auf, wenn kein Drucker verfügbar ist, wie von mir und Otto angedeutet.)

[Wolfgang Ciriack]

Ja, danke für den Hinweis.

[brandelh]

sehr verwunderlich, ist auf einem modernen Windows nicht zumindest der Print To PDF vorhanden ?

[Tom]

@Hubert: Es gibt zwei mögliche Ursachen, die eine ist das Fehlen eines Standarddruckers, die andere das deaktivierte Spooling. Und je nach Gruppenrichtlinie und vielen, vielen anderen Einstellungen ist es tatsächlich möglich, dass Dir vorübergehend auf einem Arbeitsplatz der Standarddrucker abhanden kommt. Da gibt es eine Menge Faktoren, die zusammenkommen können.