Impressão Matricial em XP e 2000

19/12/2003

1

Estou tentando imprimir um relatório matricial em uma impressora conectada a outro computador na rede. Mas para isso preciso capturar a porta de impressão do computador que a impressora está conectada, no windows 95 e 98 ao selecionar a impressora e clicarmos em capturar porta selecionamos a impressora e beleza, já no XP e 2000 não consigo capturar.
Por Favor me ajudem urgente!!!!


Responder

Posts

24/12/2003

P_lima

Fiz para resolver meu poblema no Windons2000 e funcionou perfeito, não sei se funciona no Windons XP. Um Abraço, Feliz Natal!!!

Com paciência tudo se conquista!

//Use no evento OnShow do form

var I : Integer;
begin
ComboBox1.Items.Clear;
For I:= 1 to Printer.Printers.Count do
Begin
if Pos(´LPT´, printer.Printers.Strings[I-1]) > 0Then
ComboBox1.Items.Add(´LPT1´)
Else if Pos(´\\´, printer.Printers.Strings[I-1]) > 0 Then
ComboBox1.Items.Add(Copy(printer.Printers.Strings[I-1],
Pos(´\\´, printer.Printers.Strings[I-1]),
length(printer.Printers.Strings[I-1]) -
Pos(´\\´, printer.Printers.Strings[I-1]) + 1));
End;

end;

Abraços.


Responder
×
+1 DevUP
Acesso diário, +1 DevUP
Parabéns, você está investindo na sua carreira