Fórum Porta de impressão #325357

14/07/2006

0

Estou tento um problema com uma função que retorna informações da impressora.
No windos 98 os dois trechos de código abaixo funcionam corretamente retornando o nome e a porta de impressão, mas no windows xp somente é retornado o nome da impressora.
Alguém conhece um outro meio de retornar o nome a e porta de impressão ?

function RetornaImpresora: string;
var
   Device : array[0..255] of char;
   Driver : array[0..255] of char;
   Port : array[0..255] of char;
   hDMode : THandle;

begin
   Printer.GetPrinter(Device, Driver, Port, hDMode);
   result := Device + ´ na porta ´ + Port;
end;

ou

Printer.Printers[printer.PrinterIndex]



Lab

Lab

Responder

Posts

14/07/2006

Massuda

Dê uma olhada [url=http://forum.clubedelphi.net/viewtopic.php?t=62545]neste tópico[/url].


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar