alp.yilmaz Posted April 6, 2017 Posted April 6, 2017 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; Quote
Hayri ASLAN Posted April 8, 2017 Posted April 8, 2017 Merhaba, Datamodule unigui wizard ile mi yarattınız? Quote
alp.yilmaz Posted April 8, 2017 Author Posted April 8, 2017 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. Quote
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.