Fórum Numerar itens em um relatório do quickreport #350670
17/12/2007
0
Bom dia, estou com uma dificuldade em gerar um relatório que numere os registros em ordem sequencial: 1, 2, 3..., para tanto estou utilizando
(evento beforeprint da banda detail:
procedure TRelResultado.DetailBand1BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);
begin
inherited;
item := item + 1;
qrlabelitem.Caption := IntToStr(item);
end;
... só que na tela sai tudo ok, porém qdo imprimo ele assume como o primeiro registro um número a mais do que o último.
Ex.: se no meu resultdo tiver 0 registros ele gera assim:
11, 12, 13, 14, 15, etc.
Por faor se algu´m puder dar uma força, agradeço.
(evento beforeprint da banda detail:
procedure TRelResultado.DetailBand1BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);
begin
inherited;
item := item + 1;
qrlabelitem.Caption := IntToStr(item);
end;
... só que na tela sai tudo ok, porém qdo imprimo ele assume como o primeiro registro um número a mais do que o último.
Ex.: se no meu resultdo tiver 0 registros ele gera assim:
11, 12, 13, 14, 15, etc.
Por faor se algu´m puder dar uma força, agradeço.
Marcosjn
Curtir tópico
+ 0
Responder
Posts
17/12/2007
Steve_narancic
No afterprint do Report zere suas variaveis
Responder
Gostei + 0
18/12/2007
Marcosjn
Valeu steve_narancic pela dica. Deu certo!
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)