quick report-urgente

Delphi

25/06/2009

eu estou desenvolvendo um relatorio que funciona da seguinte forma: a ultima pagina depende de uma condição por exemplo:
se o relatorio tem 5 paginas, e a condição for atendida é exibida mas uma pagina, total de 6 paginas.
Gostaria de saber como eu faço isso!!!
muito obrigado pessoal


Rsoares

Rsoares

Curtidas 0

Respostas

Bride

Bride

25/06/2009

Bom dia Rsoares,


Você ja deu uma olhada nos exemplos da Delphi.


GOSTEI 0
Rsoares

Rsoares

25/06/2009

não, mas acho que essa situação tambem eles não tem de exemplo


GOSTEI 0
Catunda

Catunda

25/06/2009

olá,
vc pode:

1ª opção: Ao terminar a última página testar a condição, e se for extendida, dê um comando QuickRep1.NewPage;

2ª opção: Colocar o QuickRep1.NewPage no evento beforeprint da band que deve aparecer na nova página.

3ª opção: Simplesmente sete a propriedade ForceNewPage da dita band para True.


GOSTEI 0
Rsoares

Rsoares

25/06/2009

Catunda, vc sabe como eu faço para identifica a ultima pagina?
eu tentei usar o ForceNewPage, mas ele cria uma pagina para cada registro.
Eu estou tentando criar a nova pagina na mão via codigo, mas é meio trabalhoso..
muito obrigado


GOSTEI 0
Catunda

Catunda

25/06/2009

Sendo assim basta que vc faça:
1 - coloque a band da folha extra como do tipo Sumary.
2 - Sete a propriedade ForceNewPage da mesma band para True.
3 - no evento BeforePrint do QuickRep vc faz:
if condicao then QuickRep1.NomedaBand.Enabled:=true
else QuickRep1.NomedaBand.Enabled:=false;

obs.: Bands do tipo sumary só são impressas ao final do relatório, após a últma band de registros.


GOSTEI 0
POSTAR