Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Delphi Alle Drucker im Netzwerk ausfindig machen??? (https://www.delphipraxis.net/6206-alle-drucker-im-netzwerk-ausfindig-machen.html)

Sued_Faust 3. Jul 2003 12:38


Alle Drucker im Netzwerk ausfindig machen???
 
Also wie kann ich alle im Netzwerk eingebundenenDrucker auflisten wäre nett wenn mir da jemand ein kleines Prog zu schriben könnte was leicht zu verstehen ist :?: :D

mfg Sued_Faust

sakura 3. Jul 2003 13:34

Wie Du jetzt an alle Netzwerkdrucker kommst weiß ich nicht, aber an die lokal installierten und registrierten Netzwerkdrucker kommst Du über das Printer-Objekt aus der Unit Printers
Delphi-Quellcode:
var
  I: Integer;
begin
  for I := 0 to Pred(Printer.Printers.Count) do
    ShowMessage(Printer.Printers[I]);
end;
...:cat:...

Christian Seehase 3. Jul 2003 14:53

Moin Sued_Faust,

die im Netzwerk freigegebenen Drucker könntest Du über WNetEnumResource herausfinden (zumindest die Freigabenamen).
Zu WNetEnumResource hatten wir schon einige Beispiele.

Sued_Faust 4. Jul 2003 10:26

hey danke erstmal an alle ich schau mal ob mir das weiterhilft :D

mfg_Sued_Faust :coder: :hello:

Sued_Faust 4. Jul 2003 13:16

hmmmm mist krieg ich nicht hin Christian könntest du mir vieleicht ein kleien quellcod aufschreiben das wäre echt nett???


mfg Sued_faust :roll:

Christian Seehase 4. Jul 2003 13:18

Moin Sued_Faust,

wir haben hier doch einige Beispiele für WNetEnumResource.
Entscheidend ist, dass Du dafür RESOURCETYPE_PRINT statt RESOURCETYPE_DISK brauchst.


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:04 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz