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;

Alguém já passou por esses problemas? Tenho esses bug no meu relatório, não consegui resolver ainda!

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

Boa tarde Daniel, Quando tiver um tempinho não esqueça de fazer os teste.

Cade o preview personalizado?

ok

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

ok, vou fazer um exemplo para verificar.

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

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

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...

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.4O 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;

Olá Pessoal, Estou tentando desenvolver um cupom não fiscal com FortesReport e Lazarus, só que não esta imprimindo é para impressora BEMATECH TERMICA MP4200TH e IMPRESSORA BEMATECH MP-20MI DUAL 4420 e estou meio perdido, qual o tamanho do papel para definir no Fortes também?. Parece que ele não encontra o mapeamento da impressora. Estou usando o DosprintUI para fazer o mapeamento da porta USB para LPT1. Segue o exemplo em anexo, o que estou fazendo de errado? Edson teste master_matricial.zip

OK, Muito Obrigado Daniel;

Olá Daniel, Foi mudado alguma coisa, conforme em [1]. Segue em anexo as correções que o pessoal fez, funcionou para mim. [1] http://forum.lazarus.freepascal.org/index.php/topic,30969.0.html Fortes.zip