Fórum Impressão em mini-impressora em rede #280572

07/05/2005

0

Delphi

Eu uso o codigo abaixo para impressão em mini impressora
AssignFile(F,´LPT1´); // ou COM1
Rewrite(F);
Writeln(F,module.tableEmpresaNome.asstring);
Writeln(F,´UN  Descrição                 Valor´);
Writeln(F,´----------------------------------------------´);
Writeln(F,´-------------------------------------´);
Writeln(F,´                 ASS.´);

CloseFile(F);


Com a impressora local FUNCIONA CORRETAMENTE, porem para impressão em rede não consegui, eu ja tentei trocar ´LPT1´ para ´\\servidor\lpt1´ mas não funciona.

Alguém tem uma idéia


Sistemald

Sistemald

Responder

Posts

07/05/2005

Edilcimar

se estiver usando xp vá no dos e destrua a impressora de rede e depois construa novamente, se utilizar dentro do windows não funciona


Responder

Gostei + 0

07/05/2005

Sistemald

Você esta falando do ´net use´, caso não seja mais especifico e destruir no dos


Responder

Gostei + 0

07/05/2005

Edilcimar

sim, o net print


Responder

Gostei + 0

07/05/2005

Sistemald

No codigo AssignFile(F,´LPT1´); // ou COM1
devo deixar LPT1?


Responder

Gostei + 0

07/05/2005

Edilcimar

deve ficar o caminho do servidor


Responder

Gostei + 0

07/05/2005

Edilcimar

veja este exemplo que eu utilizo
If (UpperCase(Programa) = ´C:\MEUPROGRAMA´) then
AssignFile(Arquivo,´LPT1´)
Else
AssignFile(Arquivo,Servidor);
servidor é o caminho do servidor


Responder

Gostei + 0

07/05/2005

Sistemald

ok, vou fazer uns teste obrigado


Responder

Gostei + 0

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

Aceitar