Jump to content

dev botao

Impressão carnê FastReport


  • Este tópico foi criado há 1535 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Moderadores

Sempre será 4?

uma ideia, cria uma variavel e vai incrementando a cada passada de pintura da linha quando chegar na ultima vai entender que é a ultima edai só dá visible false ou não printavel

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Transparent-02.png
 

 

Link to comment
Share on other sites

var contarlinha:integer;
              
procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin  

   inc(contarlinha);
  Memo21.text := inttostr(contarlinha);  //Coloquei pra verificar o valor em cada masterdata    
       
end;

procedure Line7OnBeforePrint(Sender: TfrxComponent);
begin    
  
  If contarlinha = 4 then
  begin
    Line7.visible := false;
    
    contarlinha := 0;   
            
  end
  else
  begin
    Line7.visible := true;
  end;

end;

begin

end.

Estou fazendo assim, mas ele não vem correto, Não começa do 1  termina no 4. se poder ajudar

Link to comment
Share on other sites

  • Este tópico foi criado há 1535 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Guest
This topic is now closed to further replies.
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.