QReport - Visualização em runtime e n# de pág.
Amigos, preciso de duas orientações... se possível é claro...
1ª dúvida
Criei uns relatorios utilizando o Qreport.. que funcionou corretamente tanto para visualiza quanto para imprimir.. necessitei criar outros só que derepente surgiu um problema que não consegui resolver... Após criar novos relatório Não consegui visualizar nem imprimir em modo runtime (execução) só consigo visualizar o relatorio durante a programação... o que pode ser? problemas no delphi?
2ª dúvida
è possível utilizar a contagem de páguinas estilo 1/1 ou 1/2 - 2/2?
Agradeço a atenção
[b:f4009b2efd][color=red:f4009b2efd]Título editado pelo Moderador (AZ) - Removido: ´Ajuda´[/color:f4009b2efd][/b:f4009b2efd]
1ª dúvida
Criei uns relatorios utilizando o Qreport.. que funcionou corretamente tanto para visualiza quanto para imprimir.. necessitei criar outros só que derepente surgiu um problema que não consegui resolver... Após criar novos relatório Não consegui visualizar nem imprimir em modo runtime (execução) só consigo visualizar o relatorio durante a programação... o que pode ser? problemas no delphi?
2ª dúvida
è possível utilizar a contagem de páguinas estilo 1/1 ou 1/2 - 2/2?
Agradeço a atenção
[b:f4009b2efd][color=red:f4009b2efd]Título editado pelo Moderador (AZ) - Removido: ´Ajuda´[/color:f4009b2efd][/b:f4009b2efd]
Ant.neto
Curtidas 0
Respostas
Phsm
30/03/2004
Já tive problemas no preview de relatórios com o QuickReport quando existia algum problema no drive da impressora padrao do windows ou se a impressora for de rede e estiver OffLine. Tente instalar uma nova impressora, ou remover todas.
Espero que tenha ajudado!
Espero que tenha ajudado!
GOSTEI 0
Evandro.ogada
30/03/2004
gente, bom dia!
tenho tido um problema parecido, e ainda não consegui resolver.
o que posso fazer?
pode ser a impressor aem rede?
no projeto tudo funciona.
na execução nada!!!
valewww...
tenho tido um problema parecido, e ainda não consegui resolver.
o que posso fazer?
pode ser a impressor aem rede?
no projeto tudo funciona.
na execução nada!!!
valewww...
GOSTEI 0
Edukobra
30/03/2004
Para imprimir no estilo 1/3 2/3 3/3 vc deve fazer o seguinte:
Crie uma variável iPagina no form de impressão na seção var do form;
Coloque um qrlabel com o nome de lblPagina no seu relatorio e no evento onPrint dele digite:
procedure Tform1lblPaginaPrint(sender: TObject;
var Value: String);
begin
Value := ´Página: ´ + IntToStr(qrSINS0311.QRPrinter.PageNumber) + ´/´ + IntToStr(iPagina);
end;
No form que vc vai fazer a chamada ao form de impressão digite:
frmForm1.quick.Prepare;
iPagina := frmForm1.quick.QRPrinter.PageCount;
frmForm1.quick.Preview;
Pronto, ta feito, comigo funciona que é uma beleza.
Crie uma variável iPagina no form de impressão na seção var do form;
Coloque um qrlabel com o nome de lblPagina no seu relatorio e no evento onPrint dele digite:
procedure Tform1lblPaginaPrint(sender: TObject;
var Value: String);
begin
Value := ´Página: ´ + IntToStr(qrSINS0311.QRPrinter.PageNumber) + ´/´ + IntToStr(iPagina);
end;
No form que vc vai fazer a chamada ao form de impressão digite:
frmForm1.quick.Prepare;
iPagina := frmForm1.quick.QRPrinter.PageCount;
frmForm1.quick.Preview;
Pronto, ta feito, comigo funciona que é uma beleza.
GOSTEI 0