demora para começar a imprimir pela rede na matricial

[porter]

olá pessoal, estou imprimindo em uma matricial pela rede, mas está demorando para começar a imprimir, se sair do sistema, começa a imprimir rapidinho, já alterei o LPT_TIMEOUT para 1 e não adiantou, no caso do set device to print e set print on o que devo fazer para a impressão começar a imprimir rapidamente.

Código: Selecionar todos

SET DEVICE TO PRINT
SET PRINT ON
SETPRC(0,0)
@ contl  ,00 SAY CHR(15)+CHR(14) + STRZERO(CODIGO,6)
@ contl,00 SAY CHR(15)+CHR(14) + TRANSFORM(VENCTO,"@!")
RETURN

Windows 7 32 bits, xHarbour.

obrigado.

[Jairo Maia]

Porter,

Quando você fecha o sistema imprime porque a impressão é finalizada. Coloque antes da linha RETURN neste seu exemplo o seguinte e faça o teste:

Código: Selecionar todos

SET PRINTER OFF
SET DEVICE TO SCREEN

[porter]

obrigado Jairo, vou fazer o teste e retorno o resultado.

[JoséQuintas]

Eu uso um SET PRINTER TO no final da impressão.
Acabei até criando estas duas funções pra facilitar.

Código: Selecionar todos

FUNCTION PrintBegin()
   SET DEVICE TO PRINT
   SetPrc( 0, 0 )
   RETURN NIL

FUNCTION PrintEnd()
   SET DEVICE TO SCREEN
   SET PRINTER TO
   SetPrc( 0, 0 )
   RETURN NIL

[porter]

obrigado Jairo, deu certo.

[Poka]

Olá

Só para constar, estava com problema para abrir uma gaveta Menno matricial ligada a uma impressora não fiscal. Para imprimir utilizo Select Printer da minigui sem problemas, mas para abrir a gaveta tive que utilizar set device to print, etc. A gaveta abria, mas só depois que saia do sistema , ou depois de uns 30 segundos. Para mim deu certo o do José Quintas.
Valeu.

Poka