Win32Prn - Duvida.
Enviado: 13 Fev 2015 13:42
boa tarde.
como ir fazendo um relatório e depois de mandar imprimir VARIAS linhas
querer começar lá do inicio para imprimir de novo
Imagine um relatório com 2 COLUNAS
tem como mandar imprimir a 1 coluna Toda ou parte e depois mandar imprimir
na 2 coluna ?
ob
Paiva
começo um relatório aqui OK....
oPrinter:NewLine()
oPrinter:SetFont('Lucida Console',22.0, 0)
oPrinter:TextOut( hb_oemtoansi(crloja->dup_nome01) , .t. )
oPrinter:SetColor( BLACK )
oPrinter:SetFont('Lucida Console',15.0, 0)
oPrinter:TextOut( xfone1 , .t. )
Neste ponto COMO fazer ele comecar do INICIO da folha. ?
oPrinter:NewLine()
oPrinter:SetFont('Lucida Console',10.5, 0)
oPrinter:SetPrc(oPrinter:Prow(),50)
oPrinter:TextOut( alltrim(pnomecli) , .t. )
oPrinter:SetPrc(oPrinter:Prow(),50)
vdet = "CNPJ: "+lcgc+" - Insc.Est: "+crloja->insc_est
oPrinter:TextOut( "CNPJ: " , .t. )
como ir fazendo um relatório e depois de mandar imprimir VARIAS linhas
querer começar lá do inicio para imprimir de novo
Imagine um relatório com 2 COLUNAS
tem como mandar imprimir a 1 coluna Toda ou parte e depois mandar imprimir
na 2 coluna ?
ob
Paiva
começo um relatório aqui OK....
oPrinter:NewLine()
oPrinter:SetFont('Lucida Console',22.0, 0)
oPrinter:TextOut( hb_oemtoansi(crloja->dup_nome01) , .t. )
oPrinter:SetColor( BLACK )
oPrinter:SetFont('Lucida Console',15.0, 0)
oPrinter:TextOut( xfone1 , .t. )
Neste ponto COMO fazer ele comecar do INICIO da folha. ?
oPrinter:NewLine()
oPrinter:SetFont('Lucida Console',10.5, 0)
oPrinter:SetPrc(oPrinter:Prow(),50)
oPrinter:TextOut( alltrim(pnomecli) , .t. )
oPrinter:SetPrc(oPrinter:Prow(),50)
vdet = "CNPJ: "+lcgc+" - Insc.Est: "+crloja->insc_est
oPrinter:TextOut( "CNPJ: " , .t. )