| Exibir mensagem anterior :: Exibir próxima mensagem |
| Autor |
Mensagem |
flexsistemas Aprendiz

Registrado: Terça-Feira, 29 de Outubro de 2013 Mensagens: 121 Localização: Caxias do Sul
|
Enviada: Sex Mar 27, 2015 9:54 am Assunto: FastReport: Adicionando +1 ao total de paginas (Resolvido) |
|
|
Olá a todos!
estou tentando adicionar +1 ao numero total de folhas e não estou conseguindo estou aplicando essa expressão ao memo mas sem resultado:
[<TotalPages>+1]
Editado pela última vez por flexsistemas em Sex Mar 27, 2015 4:07 pm, num total de 1 vez |
|
| Voltar ao Topo |
|
 |
flexsistemas Aprendiz

Registrado: Terça-Feira, 29 de Outubro de 2013 Mensagens: 121 Localização: Caxias do Sul
|
Enviada: Sex Mar 27, 2015 4:05 pm Assunto: |
|
|
Resolvi da seguinte forma:
| Código: |
Dtm_Conexao.frxReport1.PrintOptions.Copies := 1;
Dtm_Conexao.frxPDFExport1.Subject := 'Inventário de Estoque';
if Dtm_Conexao.frxReport1.PrepareReport(True) then
begin
Dtm_Conexao.FDMemTable1.Edit;
Dtm_Conexao.FDMemTable1NRO_PAGINAS.AsInteger := Dtm_Conexao.frxReport1.PreviewPages.Count +1;
Dtm_Conexao.FDMemTable1.Post;
Dtm_Conexao.frxReport1.ShowReport(True);
end;
| [/code] |
|
| Voltar ao Topo |
|
 |
|