Buscar

Qtde de registros a ser impressa por pagina (qrep)

Código

{1. A forma mais simples consiste em alterar a altura (Height) da banda Detail do nosso relatório de modo que a altura total da página seja inferior a duas vezes a altura da banda. Desta forma, cada registro será impresso em uma nova página, teoricamente por falta de espaço na página atual. 2. Uma outra forma mais sofisticada é usar o evento AfterPrint da banda Detail. Nele testamos se ainda não chegou no fim a tabela e, caso positivo, pedimos uma nova página:}

  if not Table1.EOF then

  QuickRep1.NewPage;

{Deve existir outras alternativas, mas as duas anteriores funcionaram bem nos testes realizados. }

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%


Detalhes da dica

Categoria: Impressão
Adicionada dia: 11/06/03
Por: Felipe Monteiro
Visualizada: 2101 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009