Clipper On Line • Ver Tópico - Harupdf: Numerando páginas no final / selecionando página

Harupdf: Numerando páginas no final / selecionando página

Projeto Harbour - Compilador de código aberto compatível com o Clipper.

Moderador: Moderadores

 

Harupdf: Numerando páginas no final

Mensagempor Softwhouse » 08 Jan 2019 08:19

Sim, estou usando o Harupdf da Minigui Extended.
Fernando
Softwhouse
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 300
Data de registro: 07 Dez 2011 17:44
Cidade/Estado: Porto Alegre/RS
Curtiu: 0 vez
Mens.Curtidas: 12 vezes

Harupdf: Numerando páginas no final

Mensagempor JoséQuintas » 09 Jan 2019 21:54

Se está usando da HMG, aí só olhando na HMG, ou perguntar na parte do fórum destinada a minigui.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18009
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

Harupdf: Numerando páginas no final / selecionando página

Mensagempor JoséQuintas » 14 Mar 2023 20:19

Queria numerar páginas do PDF no final da geração.

Fui procurar e..... achei este meu post de 6 anos atrás kkkk
Só agora usei pra valer isso.

criei o array pra páginas:
   VAR aPDFPageList  INIT {}


A cada criação de página, salvo a referência à página
   ::oPdfPage := HPDF_AddPage( ::oPdf )
   AAdd( ::aPDFPageList, ::oPDFPage )


No final, acesso cada página e escrevo:
   FOR nCont = 1 TO ::nFolhas
      ::oPDFPage := ::aPDFPageList[ nCont ]
      ::DrawTexto( 383, ::nLinhaPdf - 047, 418, Nil, Str( nCont, 1 ) + "/" + Str( ::nFolhas, 1 ), HPDF_TALIGN_CENTER, ::oPDFFontBold, 10 )
   NEXT


TODAS as páginas ficam disponíveis durante todo processo da harupdf.
Basta salvar a referência a elas.
Adicional: essa classe usa a página atual em ::oPDFPage pra fazer as coisas, por isso vou atribuindo aí dentro do FOR/NEXT, pra não ter que criar rotina especial

Estou alterando o DACTE, o "danfe" de conhecimentos, pra mais páginas.
E ficar calculando quantas páginas vai dar... é muito ruim... assim resolveu.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18009
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

Anterior



Retornar para Harbour

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 9 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro