Bom dia a todos,
Caros faço meus relatorios utilizando HBPrinter e estou com um problema:
Utilizo uma impressora HP Deskjet 1020 onde faço os testes dos meus relatorios, mais quando imprimo para uma lexmark laser que tem aqui no serviço a formatacao sai toda errada, toda fora de linhagem, mais quando imprimo na HP sai que é uma beleza, alguem saberia me dizer o que é ???
vou postar meu codigo fonte exemplo para analise:
Function Imprimir_Ferias2()
Local nLinha := 0
Local nPagina := 1
Local _qtd_ps := 0
PRIVATE aPrinters, aports
INIT PRINTSYS
GET PRINTERS TO aprinters
GET PORTS TO aports
RELEASE PRINTSYS
SELECT BY DIALOG PREVIEW
If HBPRNERROR > 0
return
Endif
SET PREVIEW SCALE 2.3
Set Page orientation DMORIENT_PORTRAIT papersize DMPAPER_A4 font "f0"
define font "F_Arial_10" name "arial" size 10
define font "F_Arial_10B" name "arial" size 10 bold
define font "F_Arial_11" name "arial" size 11
define font "F_Arial_11B" name "arial" size 11 bold
define font "F_Arial_12" name "arial" size 12
define font "F_Arial_12B" name "arial" size 12 bold
define font "F_Arial-13" name "arial" size 13
define font "F_Arial_13B" name "arial" size 13 bold
define font "F_Arial_14" name "arial" size 14
define font "F_Arial_14B" name "arial" size 14 bold
define font "F_Arial_16" name "arial" size 16
define font "F_Arial_16B" name "arial" size 16 bold
define Pen "P_Linha1" style PS_SOLID width 1 color 0x000000 // linha fina
define Pen "P_Linha2" style PS_SOLID width 4 color 0x000000 // lin
START DOC NAME "Ferias"
START PAGE
@ 03, 05 Say 'AVISO E RECIBO DE FÉRIAS' FONT 'F_Arial_16B' to PRINT
@ 01, 50, 06, 96 RECTANGLE
@ 02, 52 Say 'Capitulo VI - TÃtulo II da C.L.T.' FONT 'F_Arial_10' to PRINT
@ 03, 52 Say 'Decreto-Lei Nº 5.452 de 01/05/1943 com as alterações' FONT 'F_Arial_10' to PRINT
@ 04, 52 Say 'do Decreto-Lei Nº 1535 de 13/04/1977' FONT 'F_Arial_10' to PRINT
@ 05, 52 Say 'Art 135 da C.L.T.' FONT 'F_Arial_10' to PRINT
END PAGE
END DOC
QUANDO IMPRIMO NA HP DESKJET 1020 IMPRESSORA QUE UTILIZO COMO BASE PARA TESTE FICA QUE É UMA BELEZA, MAIS QUANDO IMPRIMO NA LEXMARK O TEXTO FICA FORA DO RETANGULO, NO PREVIEW JA VEJO O ERRO... O QUE SERIA ???
FICO NO AGUARDO
Utilizo Xhabour 1.0.0.+ minigui + bcc