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

[Softwhouse]

Sim, estou usando o Harupdf da Minigui Extended.

[JoséQuintas]

Se está usando da HMG, aí só olhando na HMG, ou perguntar na parte do fórum destinada a minigui.

[JoséQuintas]

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:

Código: Selecionar todos

   VAR aPDFPageList  INIT {}

A cada criação de página, salvo a referência à página

Código: Selecionar todos

   ::oPdfPage := HPDF_AddPage( ::oPdf )
   AAdd( ::aPDFPageList, ::oPDFPage )

No final, acesso cada página e escrevo:

Código: Selecionar todos

   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.