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.