Fórum Erro para exportar do QuickReport para PDF #263283
23/12/2004
0
Alguem pode me ajudar.
Uso o QuickReport 4.0 professional for Delphi 7.
Tenho um relatório em que quando dou um preeview, funciona, mas quando salvo em PDF, a imagem gerada em PDF é diferente da do Preeview do QuickReport.
OBS: Neste referido relaório, tenho um if como descrito na procedure abaixo:
procedure TFRprc.PageHeaderBand1BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);
begin
if QuickRep1.PageNumber = 1 then
begin
PageHeaderBand1.Height := 177;
QRLabel36.Enabled := False;
QRLabel36.Visible := False;
QRLabel38.Enabled := False;
QRLabel38.Visible := False;
QRLabel39.Enabled := False;
QRLabel39.Visible := False;
QRLabel40.Enabled := False;
QRLabel40.Visible := False;
QRLabel41.Enabled := False;
QRLabel41.Visible := False;
end
else
begin
PageHeaderBand1.Height := 200;
QRLabel36.Enabled := True;
QRLabel36.Visible := True;
QRLabel38.Enabled := True;
QRLabel38.Visible := True;
QRLabel39.Enabled := True;
QRLabel39.Visible := True;
QRLabel40.Enabled := True;
QRLabel40.Visible := True;
QRLabel41.Enabled := True;
QRLabel41.Visible := True;
end;
end;
Desta forma quando é pagina 1 oculta alguns QRlabel´s, mas nas outras páginas, não sendo 1, imprime todos os QRLabel´s.
Quando executo o preeview, está OK, mas quando exporto para PDF, aparece todos os QRLabe´s mesmo que a página é 1. O que não deveria ocorrer.
Obrigado pela atenção.
Se alguem puder me ajudar,
Obrigado até o momento.
Uso o QuickReport 4.0 professional for Delphi 7.
Tenho um relatório em que quando dou um preeview, funciona, mas quando salvo em PDF, a imagem gerada em PDF é diferente da do Preeview do QuickReport.
OBS: Neste referido relaório, tenho um if como descrito na procedure abaixo:
procedure TFRprc.PageHeaderBand1BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);
begin
if QuickRep1.PageNumber = 1 then
begin
PageHeaderBand1.Height := 177;
QRLabel36.Enabled := False;
QRLabel36.Visible := False;
QRLabel38.Enabled := False;
QRLabel38.Visible := False;
QRLabel39.Enabled := False;
QRLabel39.Visible := False;
QRLabel40.Enabled := False;
QRLabel40.Visible := False;
QRLabel41.Enabled := False;
QRLabel41.Visible := False;
end
else
begin
PageHeaderBand1.Height := 200;
QRLabel36.Enabled := True;
QRLabel36.Visible := True;
QRLabel38.Enabled := True;
QRLabel38.Visible := True;
QRLabel39.Enabled := True;
QRLabel39.Visible := True;
QRLabel40.Enabled := True;
QRLabel40.Visible := True;
QRLabel41.Enabled := True;
QRLabel41.Visible := True;
end;
end;
Desta forma quando é pagina 1 oculta alguns QRlabel´s, mas nas outras páginas, não sendo 1, imprime todos os QRLabel´s.
Quando executo o preeview, está OK, mas quando exporto para PDF, aparece todos os QRLabe´s mesmo que a página é 1. O que não deveria ocorrer.
Obrigado pela atenção.
Se alguem puder me ajudar,
Obrigado até o momento.
M
Curtir tópico
+ 0
Responder
Clique aqui para fazer login e interagir na Comunidade :)