Oi Jean,
vu tentar descrever o meu problema.
Para declarar a pagina estou usando este código.
procedure TFrm_Relatorios.RvSystem_Certidao_PositivaBeforePrint(
Sender: TObject);
begin
with Sender as TBaseReport do
begin
SetPaperSize(DMPAPER_LETTER,32,90);
ClearTabs;
SetTab(1.0,pjLeft,6.0,0,BOXLINENONE,0);
SetTab(NA ,pjLeft,6.0,0,BOXLINENONE,0);
SetTab(NA ,pjLeft,5.0,0,BOXLINENONE,0);
SetTab(NA ,pjLeft,2.0,0,BOXLINENONE,0);
SaveTabs(1);
end;
end;
Ja fiz isso que vc falo de pular as linhas, mais o problema é q o
papel deminui de tamanho não cabendo a quantidade de registro na
página.
Ex. Na primeira página cabe 14 registro na segunda dependendo da
quantidade de linhas que eu coloco para pular o cabeçalho cabe cada
vez menos na página.
Bom tentei mudar a propiedade MarginTop em tempo de execução.
Ex. A partir da segunda página aumento MarginTop para 8, isso faz
como te disse tambem caber menos registro na página.
A impressora que uso é uma Epson FX890 ao pegar a segunda folha de
papel timbrado imprimi no cabeçalho da folha.
with Sender as TBaseReport do
begin
if cont_pag=1 then
begin
MarginTop := 8;
end;
if cont_pag = 0 then
cont_pag := 1;
end;
Desde já quero agradecer pela atenção.
Um abraço,
Marcelo Mauricio
Recife, 09 de dezembro de 2009
--- Em delphi-br@yahoogrupos.com.br, Jean Barreiros <delphij...@...>
escreveu
>
> Olá,
>
> Bom´, como você esta fazendo na "mão grande" você
> deve pular uma determinada quantidade de linhas,
> tipo 4 ou 6 linhas pra ficar o espaço do timbre,
> se já tentou isso e não deu certo, descreva melhor
> seu problema.
>
> Att,
> Jean Barreiros
> Programador/Web-Designer
> Delphi, C++, PHP, JavaScript
> FireBird/InterBase, MySql, SQLServer, PostGree, Oracle
> msn: j...@...
> e-mail: delphij...@...
>
>
>
>
> ________________________________
> De: surfvibration <surfvibrat...@...>
> Para: delphi-br@yahoogrupos.com.br
> Enviadas: Quinta-feira, 8 de Janeiro de 2009 18:06:28
> Assunto: [delphi-br] Papel Timbrado no Rave Report
>
>
> Pessoal,
>
> to precisando muito da ajuda de vcs.
> Estou tentando imprimir um documento num papel timbrado com
cabeçalho
> pre-definido.
>
> O meu problema é que a partir da 2 folha a impressora que é uma
Epson
> FX890 imprime sem respeitar as margens do papel timbrado.
>
> Estou fazendo todo o relatório na mão usando o Rvsystem para isso
sem
> usar o designer do Rave.
>
> Como posso fazer para que a impressão respeite as o cabeçalho do
> Papel timbrado?
>
> Desde já agradeço a colaboração de todos.
>
> Marcelo Mauricio
> Recife, 08 de janeiro de 2009
>
>
>
>
> Veja quais são os assuntos do momento no Yahoo! +Buscados
> http://br.maisbuscados..yahoo.com
>
> [As partes desta mensagem que não continham texto foram removidas]
>
