Página 1 de 1
MR Boleto gerar EMF
Enviado: 17 Out 2017 14:18
por Shark
Boa tarde colegas,
Estou (após anos de atraso) implementando o uso de BOLETO em meu sistema.
Dentre muitas soluções as quais pesquisei, decidi pelo AcBR.
Entretanto, como não consegui compilar o AcBr com Lazarus e preciso, por hora, apenas imprimir os boletos, decidi, em caráter emergencial, utilizar o MR_BOLETO.
O MR_Boleto gera os documentos em formato PDF. Isso é muito bom. Contudo, preciso agora de algumas dicas dos colegas nas dúvidas abaixo:
1 - Como imprimir PDF via código harbour?
2 - É possível converter o PDF em EMF para mostrar no preview do meu sistema?
3 - Você indicaria uma outra solução FREE para gerenciar boletos?
No Aguardo... Agradeço antecipadamente.
MR Boleto gerar EMF
Enviado: 17 Out 2017 14:40
por janio
Veja
viewtopic.php?f=4&t=18633&p=118646#p118646
Janio
MR Boleto gerar EMF
Enviado: 17 Out 2017 16:26
por Shark
Agradeço pelo dica Jânio. É um Caminho...
Preciso de um design (impressão) dO boleto escrito em Harbour. Apenas para ser visualizada no preview.
Tentei adaptar as do MR-BOLETO mas as coordenadas de impressão para PDF são diferentes das que usamos. Não sei se é em centímetros ou pixels. Tentei as duas mas acabei desistindo devido a dificuldade.
Alguém poderia gentilmente fornecer esses códigos?
A impressão definitiva farei pelo PDF gerado pelo MR-BOLETO mesmo.
MR Boleto gerar EMF
Enviado: 17 Out 2017 16:45
por Kapiaba
MR Boleto gerar EMF
Enviado: 19 Out 2017 12:16
por JoséQuintas
Tem a PDF Class que permite trabalhar em pixels, centímetros ou row/col.
Pode usar a idéia dela.
Lembro de ter visto uma classe/rotina pra usar em PDF ou Windows, acho que foi na OOHG.
Pelo que entendi, precisa mais da idéia do que do fonte propriamente dito.
Basicamente é criar uma rotina de conversão:
oPDF:DrawText( Row, Col, Text )
Algo como ConverteRow( nRow ), ConverteCo( nCol )
Basta a fórmula pra "traduzir" uma medida pra outra.
MR Boleto gerar EMF
Enviado: 19 Out 2017 12:22
por JoséQuintas
O que uso na PDFClass
Código: Selecionar todos
METHOD RowToPDFRow( nValue ) CLASS PDFClass
DO CASE
CASE ::nDrawMode == PDFCLASS_DRAWMODE_ROWCOL
nValue := ::nPageHeight - ::nBottomMargin - ( nValue * ::nFontSize * ::nLineHeight )
CASE ::nDrawMode == PDFCLASS_DRAWMODE_CENTIMETER
nValue := ::nPageHeight - ( nValue * 2.83464 )
CASE ::nDrawMode == PDFCLASS_DRAWMODE_PIXEL
nValue := ::nPageHeight - nValue
ENDCASE
RETURN nValue
METHOD ColToPDFCol( nValue ) CLASS PDFClass
DO CASE
CASE ::nDrawMode == PDFCLASS_DRAWMODE_ROWCOL
nValue := nValue * ::nFontSize / 1.666 + ::nLeftMargin
CASE ::nDrawMode == PDFCLASS_DRAWMODE_CENTIMETER
nValue := nValue * 2.83464 // 72 * 0.03937
CASE ::nDrawMode == PDFCLASS_DRAWMODE_PIXEL
// Nothing to do
ENDCASE
RETURN nValue
Essas duas rotinas convertem tudo, e posso usar qualquer das três medidas, só precisou da fórmula.
Para a Harupdf tanto faz, ela recebe sempre na medida dela.