Drucker auslesen mit EnumPrinters

[RWarnecke]

Hallo zusammen,

ich habe folgendes Problem. Wenn ich mit dem Befehl

Delphi-Quellcode:

EnumPrinters(PRINTER_ENUM_CONNECTIONS or PRINTER_ENUM_LOCAL or PRINTER_ENUM_NAME, nil, 4, PByte(Buffer), Count, Count, NumInfo)

die Anzahl meiner Drucker auslese, bekomme ich 4 raus bei NumInfo. Mache ich das gleiche nur mit dem Level 2, dann bekomme ich nur 3 raus bei NumInfo. Woran liegt das ? Der eine Drucker der nicht erkannt wird, ist ein Share-Drucker auf einen anderen Rechner. Wenn dieser Share weg ist, funktioniert alles Wunderbar.

[f.siebler]

Zitat:

Zitat von RWarnecke

die Anzahl meiner Drucker auslese, bekomme ich 4 raus bei NumInfo. Mache ich das gleiche nur mit dem Level 2, dann bekomme ich nur 3 raus bei NumInfo. Woran liegt das ? Der eine Drucker der nicht erkannt wird, ist ein Share-Drucker auf einen anderen Rechner. Wenn dieser Share weg ist, funktioniert alles Wunderbar.

Soweit ich weiß, ist das so gewollt, darüber lassen sicht meines wissens nach Netzwerkdrucker ausschließen.. macht also schon Sinn....

[RWarnecke]

Zitat:

Zitat von f.siebler

Soweit ich weiß, ist das so gewollt, darüber lassen sicht meines wissens nach Netzwerkdrucker ausschließen.. macht also schon Sinn....

Ok, das kann ich ja vielleicht noch einsehen. Nur wie lese ich dann die Drucker aus, die ich als Share zugewiesen habe ?

[marabu]

Hallo Rolf,

mit WNetOpenEnum() kannst du dir eine Liste der verbundenen Drucker (dwType = RESOURCETYPE_PRINT) besorgen.

Grüße vom marabu

[RWarnecke]

Zitat:

Zitat von marabu

Hallo Rolf,

mit WNetOpenEnum() kannst du dir eine Liste der verbundenen Drucker (dwType = RESOURCETYPE_PRINT) besorgen.

Grüße vom marabu

Noch eine Verständnisfrage. Funktioniert dieser Befehl auch dann, wenn ich die Share's in einer Umgebung verbinde, wo keine Domaine existiert ? Also meine Rechner sind alle nur in einer Arbeitsgruppe mit Ihren eigenen Namen. Da kann es auch passieren das die Arbeitsgruppen unterschiedlich heißen.

[marabu]

Warum nicht?

Aber mal eine Frage zurück: Warum verwendest du bei EnumPrinters nicht einfach andere Flags?

Delphi-Quellcode:

EnumPrinters(PRINTER_ENUM_SHARED or PRINTER_ENUM_LOCAL or PRINTER_ENUM_NAME, ...

[RWarnecke]

Ich habe schon verschiedene Möglichkeiten ausprobiert, nur leider bisher noch nicht die richtige gefunden.

[marabu]

Vergiss bitte _SHARED, da war ich auf dem Holzweg. Ich habe jetzt einfach mal den VCL-Code verwendet und muss feststellen, dass der soeben eigens im Netz installierte GENERIC PRINTER anstandslos in der Liste Printer.Printers auftaucht. Dort werden die Flags PRINTER_ENUM_CONNECTIONS und PRINTER_ENUM_LOCAL verwendet. Vielleicht steckt ja dein Fehler wo anders?

[RWarnecke]

Danke marabu für Deine Hilfe. Ich habe meinen Fehler vorerst einmal gefunden. Ich habe irgendwie ein kudelmuddel mit den Flags und den Level's gehabt. Habe jetzt nochmals die Flags neu geschrieben und nun funktioniert es. Ich weiß allerdings noch nicht warum das so ist. Ich werde es morgen nochmal auf einen Rechner testen, der in einer Domaine ist. Ich bin aber zuversichtlich, dass es jetzt funktioinert.