Relatório agrupado com Rave programado Duplex

Delphi

08/05/2006

Usando:
Rave programado
Impressora com recurso Duplex (imprime frente e verso)
Relatório agrupado por estado, quebrando por UF

O problema:
Vou explicar com um exemplo: quero
gerar um relatório de cidades agrupado
por estado, ou seja, quebrando por UF.

Como vai ser impresso frente e verso (Duplex),
gostaria que o início de cada UF ocorresse
sempre na frente, ou seja, NÃO INICIAR UM
ESTADO NO VERSO DE OUTRO.

procedure...
var
UF: string;
begin
ClientDataSet1.First;
while not ClientDataSet1.Eof do
begin
//imprime UF
UF := ClientDataSet1.FieldByName(´UF´).AsString;
while (UF = ClientDataSet1.FieldByName(´UF´).AsString) and not ClientDataSet1.Eof do
begin
//imprime a cidade

ClientDataSet1.Next;
if (LinesLeft < 0) and not ClientDataSet1.Eof then
NewPage;
end;
NewPage;

//O PROBLEMA: COMO CODIFICAR ESTA PARTE?
//se verso da folha eject para iniciar estado (UF) na frente da folha
if RpDev.SupportDuplex and VersoFolha then
EjetarFolha //NewPage nao funiona, pois imprime o cabeçalho e avança o numero da página.

end;
end;


Exemplo:

(Folha01 frente, pagina 01) AC Cidade
(Folha01 verso, pagina 02) AC Cidade
(Folha02 frente, pagina 03) AC Cidade
(Folha02 verso, em branco)
(Folha03 frente, pagina 04) AL Cidade
(Folha03 verso, pagina 05) AL Cidade
(Folha04 frente, pagina 06) AL Cidade
(Folha04 verso, em branco)
(Folha05 frente, pagina 07) AM Cidade
(Folha05 verso, pagina 08) AM Cidade
(Folha06 frente, pagina 09) AM Cidade
(Folha06 verso, em branco)


Alguma sugestão?

[]s
Paulo Geloramo


Paulo Geloramo

Paulo Geloramo

Curtidas 0
POSTAR