Hi Guillermo,

Use:
lFullDetails   := TRUE
lLocalPrinters := FALSE
aPrinters      := GETPRINTERS( lFullDetails, lLocalPrinters )

in aPrinters you will find:

{ ;
{ "Printer Full Name 1", "Port Name", "LOCAL" | "NETWORK", "Driver Name } ,;
....
}

Best Regards

Francesco


Il 11/11/2008 18.04, Guillermo Varona Silupú ha scritto:
Szakáts Viktor escribió:
Hi,

Check GETPRINTERS() in hbwin.lib.
In this PRG:
-----------------------------------------------------------------
function main()
  setmode(25,80)
  aPrn := GETPRINTERS()
  cPrn := GetDefaultPrinter()
  aPor := PRINTERPORTTONAME()
  ? aPrn
  wait
  return nil
-----------------------------------------------------------------
I have identified the following functions:
aPrn := GETPRINTERS(), give me this:
APRN[1] "\\Estudio0393\Epson FX-2180"
APRN[2] "\\Estudios0596\HP DesignJet 1055CM by HP"
APRN[3] "Xerox Phaser 3420 PCL 6"
APRN[4] "PDFCreator"
APRN[5] "Microsoft Office Document Image Writer"
APRN[6] "Adobe PDF"

cPrn := GetDefaultPrinter(), give me this:
"Xerox Phaser 3420 PCL 6"

aPor := PRINTERPORTTONAME(), give me this:
""
What does this function?

How can I obtain a list of ports used by printers (aPrn)?

TIA

Best Regards
GVS
_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour
_______________________________________________
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour

Reply via email to