Erro ao imprimir em LPT2

Question

Var X: Integer; P: TextFile; Count: Integer;begin  try   Count := TValues.Count;   AssignFile(P,�LPT2�);   Rewrite(P);   Writeln(P);   pgStatus.Position := 0;   pgStatus.Max := Count;   for X := 0 to ...

Massuda · Answer

Pergunta boba.. existe LPT2 na m�quina? Normalmente, as m�quinas possuem apenas uma porta paralela (LPT1)....

Nightshade · Answer

eu adicionei uma impressora LPT1, sem possuir uma, dai ele abre as tarefas de impressao e lista os arquivos q mandei pra ela normal, porem quando fa�o isto com uma LPT2 ou LPT3 nao funciona..
tenho receio de quando levar para testar no cliente nao funcionar tmbm..

Alves · Answer

nao sei c voce ja fez mas,   tenta instalar a mesma impressora ao inves de lpt1, seleciona a lpt2  e poe ela como padrao.......

Nightshade · Answer

eu nao tenho impressora, apenas adicionei uma, e informei que estava conectada a LPT1
dai mandei imprimir por ela, e entao foi exibido para mim o icone de printer na tray bar
com as tarefas de impressao, significando que a minha fun��o esta enviando o documento para impressao via LPT1..
porem quando fiz isto mudando a porta no programa e na impressora que eu adicionei para LPT2 nao funcionou..
esta fun��o verifica se a porta existe ou n�o?

Massuda · Answer

Independente de ter ou n�o uma impressora ligado na sua m�quina, provavelmente sua m�quina tem fisicamente uma porta de impressora que o Windows chama de LPT1. Entretanto, a n�o ser que voc� tenha comprado uma m�quina com mais de uma porta paralela, fisicamente n�o existe LPT2, LPT3, etc, por isso d� erro.

F�rum Erro ao imprimir em LPT2 #341185