Fórum Quick Report - Linha mais forte a cada 5 registros... #270520
01/03/2005
0
Saudações a todos.
Uso Delphi7 e Firebird 1.5. Tenho um relatório bem simples que pega registros de um dataset segundo instruções SQL que passo.
O relatório tem 3 bands: title, collumn header e detail.
Preciso que na band detail saia uma linha mais forte a cada 5 registros que ela apresentar. Ou então que seja algo parecido, alguma coisa que destaque o fim de cada bloco de 5 registros.
Desde já obrigado pela colaboração.
Uso Delphi7 e Firebird 1.5. Tenho um relatório bem simples que pega registros de um dataset segundo instruções SQL que passo.
O relatório tem 3 bands: title, collumn header e detail.
Preciso que na band detail saia uma linha mais forte a cada 5 registros que ela apresentar. Ou então que seja algo parecido, alguma coisa que destaque o fim de cada bloco de 5 registros.
Desde já obrigado pela colaboração.
Horus
Curtir tópico
+ 0
Responder
Posts
01/03/2005
Anfm
Crie uma variável no private desta unit do seu relatório e no evento Before print da sua banda detail coloque o seguinte código:
if numlinhas = 5 then
begin
numlinhas := 0;
DetailBand1.Color := not DetailBand1.Color;
end
else
DetailBand1.Color := clWhite;
numlinhas := numlinhas + 1;
Espero ter ajudado.
André
if numlinhas = 5 then
begin
numlinhas := 0;
DetailBand1.Color := not DetailBand1.Color;
end
else
DetailBand1.Color := clWhite;
numlinhas := numlinhas + 1;
Espero ter ajudado.
André
Responder
Gostei + 0
01/03/2005
Horus
Muito obrigado.
Deu certo.
Deu certo.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)