Jump to content

FastReport ile Global Çalışma Sorunu


alp.yilmaz

Recommended Posts

Merhaba Farsah Bey.

 

Benim Sorunum Şudur.

 

Database Module Üzerine

Bir Adet FrxReport         (FastReport)

Bir Adet frxDBDataset    (FastReport)

Bir Adet frxPDFExport   (FastReport)

Bir Adet TUniQuery     (UniDAC Query Component)

 

Database Module unigui üzerinden oluşturdum.

 

Program içerisindeki Diğer Herhangi bir Formdan Bir Rapor aldığımda Sıkıntısız olarak Raporu Dökmektedir.

Vermiş Olduğum Kıstaslara göre Rapor Düzgün olarak gelmektedir.

 

Farklı Bir Session da ve Farklı Bir PC de Rapor almaya çalıştığım zaman Raporu ilk açan sessionda hangi rapor alınmış ise bu Raporu Diğer Ekrana çıkartmaktadır.

Bu Konuda Yardımlarınızı beklemekteyim

Kullanmış olduğum Kodu Aşağıda Gönderiyorum

iyi çalışmalar dilerim.

  s := UniMainModule.sPath+'files/EXTRE_'+UniSession.SessionID+'.fr3';
               DB.frxReport1.PrintOptions.ShowDialog := False;
               DB.frxReport1.ShowProgress:=false;
               DB.frxReport1.EngineOptions.SilentMode:=True;
               DB.frxReport1.EngineOptions.EnableThreadSafe := True;
               DB.frxReport1.EngineOptions.DestroyForms := False;
               DB.frxPDFExport1.Creator := '';

               DB.frxPDFExport1.Title := 'Cari Hesap Extresi';
               DB.frxPDFExport1.Author := 'MiraERP';
               DB.frxPDFExport1.Subject := LBLKODU.Caption + ' ' + LBLADI.Caption;

               DB.frxPDFExport1.Background:=True;
               DB.frxPDFExport1.ShowProgress:=False;
               DB.frxPDFExport1.ShowDialog:=False;
               DB.frxPDFExport1.FileName := UniServerModule.NewCacheFileUrl(False, 'pdf', '', '', PDF);
               DB.frxPDFExport1.DefaultPath := '';
               DB.frxReport1.PreviewOptions.AllowEdit:=False;
               DB.frxReport1.LoadFromFile(s);
               DB.frxReport1.PrepareReport();
               DB.frxReport1.Export(DB.frxPDFExport1);
               FReport.FileName :=   DB.frxPDFExport1.FileName;
               FReport.UniURLFrame1.URL := PDF;
               FReport.UniURLFrame1.Refresh;
               FReport.Show;

 

 

 

 

 

 

 

Link to comment
Share on other sites

Evet.

Hayri Bey.

 

Versiyon 1 Upgrade Ettim Projeyi ve Demolardaki Gibi Uygulayınca Oldu. Ayrıca Yukardaki Kodda.

 frxReport1.EngineOptions.UseGlobalDataSetList := False;

Eksikmiş..

 

Sorun Şimdi Sanki Çözülmüş gibi ilerleyen zamanlarda başkabirşey çıkmaz ise.

Link to comment
Share on other sites

Please sign in to comment

You will be able to leave a comment after signing in



Sign In Now
×
×
  • Create New...