Dúvidas com Fortes Report

[elidorio]

Olá Pessoal,

Estou tendo alguns problemas com os meus relatório desenvolvido com o 
Fortes.
Os relatórios estão ficando presos na memória, o primeiro relatório 
gerado sai normal, ao tentar gerar o segundo relatório sai os mesmos 
dados do primeiro. Estou usando Lazarus 1.4.4 fpc. 2.6.4

O que pode estar acontecendo?

Estou fazendo assim nos eventos:

procedure Tfrmrelvendadir.bimprimirClick(Sender: TObject);
begin
  qryreport.Close;
  qryreport.ParamByName('pdata1').AsDate := StrToDate(dtpini.Text);
  qryreport.ParamByName('pdata2').AsDate := StrToDate(dtpfim.Text);
  qryreport.Open;
  if rdgopcao.ItemIndex = 0 then
  begin
    with Tfrmrelvendadirfr.Create(nil) do
      try
        //Application.CreateForm(Tfrmrelvendadirfr, frmrelvendadirfr);
        rlempresa.Caption := dmcad.empresa;
        RLusuario.Caption := frmmenu.usuariolog;
        rldata1.Caption := dtpini.Text;
        rldata2.Caption := dtpfim.Text;
        //frmrelvendadirfr.RLReport1.PreviewModal;
        //frmrelvendadirfr.RLReport1.Preview;
        RLReport1.Preview;
      finally
        Destroy;
      end;
  end;
  if rdgopcao.ItemIndex = 1 then
  begin
    with Tfrmrelvendadirfr.Create(nil) do
      try
        //Application.CreateForm(Tfrmrelvendadirfr, frmrelvendadirfr);
        rlempresa.Caption := dmcad.empresa;
        RLusuario.Caption := frmmenu.usuariolog;
        rldata1.Caption := dtpini.Text;
        rldata2.Caption := dtpfim.Text;
        RLReport1.Print;
      finally
        Destroy;
      end;
  end;
end;                               

 

procedure Tfrmrelvendadir.FormDestroy(Sender: TObject);
begin
  frmrelvendadirfr.Free;
  frmrelvendadirfr := nil;
end;  

[Daniel Simoes]

O que você quer dizer com "Os relatórios estão ficando presos na memória, "  ??

Memory leak ?

[elidorio]

Os relatório estão ficando na memória. Mesmo passando os comandos   frmrelvendadirfr.Free;
e  frmrelvendadirfr := nil;

Gero o primeiro relatório sai normal o segundo sai com os mesmo dados do primeiro, é muito estranho...

[Daniel Simoes]

Estranho, pois você está criando/destruindo o mesmo... (recomendo usar "Free" e não "Destroy")

Talvez o Fortes use variáveis globais em suas units...

Qual informação exatamente, fica repetida entre um relatório e o próximo ?

[elidorio]

Mesmo trocando Destroy por free, continua a mesma coisa.

Toda a parte do sql sai repetida, conforme o anexo o período que esta no anexo são período do segundo mais os dados são do primeiro.

rel1.pdf

[Daniel Simoes]

O problema pode estar na sua rotina que alimenta o relatório...

Tente algo mais simples, para isolar se o problema é do Fortes... crie um mini projeto, que apenas liste um relatório simples, e veja se o problema também ocorre...

[elidorio]

Posso fazer um mini projeto para teste, mais eu tenho 4 relatório no fortes que estão com os mesmo problema.

[Daniel Simoes]

Veja... o Bug pode até ser no Fortes... mas você precisará sinalizar isso de forma muito clara para eles...

- Onde o bug está, e como ele ocorre.

Não dá pra analisar nada no Fortes, com as informações que você passou até o momento...

[elidorio]

ok, vou fazer um exemplo para verificar.

[elidorio]

Olá Daniel,

Segue um mimi aplicativo que demostra o problema.

1- Execute o 1 primeiro relatório, selecionando um período de código.

2 - Após a exibição feche a tela de filtros.

3 - Abre novamente a tela de filtros e selecione um período diferente do primeiro.

Observe que foi foi exibido os mesmos dados que estava no primeiro filtro.

 

 

report.7z

[Daniel Simoes]

Prometo que dou uma olhada... mas estou com vários outros assuntos para avaliar no momento... 

[elidorio]

ok

[elidorio]

Boa tarde Daniel,

Quando tiver um tempinho não esqueça de fazer os teste.

[elidorio]

Também fiz um teste com essa nova versão e o problema ainda persiste.

[Daniel Simoes]

Não analisei esse caso...

[elidorio]

Alguém já passou por esses problemas?

Tenho esses bug no meu relatório, não consegui resolver ainda!

[elidorio]

Depois de muitas pesquisas, encontrei a solução para esse problemas hoje.

Ao invés de chamar o frm com o show modal, chamei desta forma e deu tudo ok!

try
    Application.CreateForm(Tfrmrel, frmrel);
    frmrel.ShowModal;
  finally
    frmrel.Release;
  end;