win32prn imprimir meia pagina e continuar na segunda metade

[Narlem]

Olá Pessoal,

Eu uso a win32prn, e funciona muito bem, mas surgiu uma nova necessidade que não consigo resolver, vou explicar melhor.

Eu preciso imprimir em uma impressora lx300 com cabo usb usando aquele formulário razão, ou seja o formulário de 80 colunas dividido ao meio.

Então eu imprimo o primeiro recibo ate a metade da folha, e ai ele pula a folha e perco a segunda metade da folha.

Eu Preciso que o seguindo recibo iniciasse após o termino da impressão do primeiro recibo, sem que o papel fosse ejetado.

Um resumo dos comandos executados são o seguinte:

cPrinter := GetDefaultPrinter()
oPrinter := WIN32PRN():New(cPrinter)
oPrinter:Landscape := .F.
oPrinter:FormType := 9
oPrinter:BottomMargin := 0
oPrinter:Copies := 1
oPrinter:SetPrintQuality(-1)
IF !oPrinter:Create()
Alert( "Não foi possivel achar a impressora, Favor verifique." )
oPrinter:Destroy()
lErro := .T.
Else
oPrinter:SetDefaultFont()
oPrinter:SetFont( "Courier New", 11, { 1, 11 }, 0, .F., .F., 0 )
EndIF

oPrinter:startdoc()
oPrinter:NewPage()

nLin := 0

do while nLin < 32

oPrinter:SetPrc( nLin, 0 )
oPrinter:TextOut( "Imprimindo LInha "+str(nLin,3) )

nLin++

enddo

oPrinter:EndDoc()
oPrinter:Destroy()

Desde já antecipo meus agradecimentos,

Narlem G. A. Santos

[kapiaba]

http://www.pctoledo.com.br/forum/viewtopic.php?t=7400

http://www.pctoledo.com.br/forum/viewtopic.php?f=4&t=9262

http://www.pctoledo.com.br/forum/viewtopic.php?f=4&t=7718

[Narlem]

Olá João,

Era exatamente o que eu tava precisando, veio ate o que eu ia perguntar depois sobre preview, muito obrigado e um abraço.

Devo ir a sp em breve e te dou um toque pra ver se a gente toma umas de leve e poe o papo em dia, obrigadão..

Narlem

[kapiaba]

Olá João,

Era exatamente o que eu tava precisando, veio ate o que eu ia perguntar depois sobre preview, muito obrigado e um abraço.

Devo ir a sp em breve e te dou um toque pra ver se a gente toma umas de leve e poe o papo em dia, obrigadão..

Narlem

Demorou mano... estou te esperando até hoje quando virias na corrida de fórmula 1, lembra?? kkkkkk

Tem facebook ou skype?? Não é "escapa" é skype, "escapar" eu sei q tú "escapa". kkkkkkkkkkk

abraços.