Ario.Paxaz Posted November 5, 2017 Share Posted November 5, 2017 Hi My Test case ,work when in stand alone and show my sample report. But when i convert it to ISAPI ,the report don't show. Best Regards. Link to comment Share on other sites More sharing options...
Ario.Paxaz Posted November 5, 2017 Author Share Posted November 5, 2017 Hi I used below function ,but don't fixed. procedure TMainForm.PrintRpt(FileName: String); begin frxReport1.LoadFromFile(FileName); Form_Print.frxReport1:=frxReport1; Form_Print.PrepareAndShow(Form_Print.frxReport1,Form_Print.frxPDFExport1); Form_Print.ShowModal; end; and this procedure TMainForm.PrintRpt(FileName: String); begin frxReport1.LoadFromFile(FileName); Form_Print.frxReport1:=frxReport1; Form_Print.PrepareAndShow(Form_Print.frxReport1,Form_Print.frxPDFExport1); end; all of them,in stand alone work. Best Regards. Link to comment Share on other sites More sharing options...
Administrators Farshad Mohajeri Posted November 8, 2017 Administrators Share Posted November 8, 2017 Hi I remember that I recomended you to start with a blank report and see if it occurs with a blank report too. Sent from my SM-N900 using Tapatalk Link to comment Share on other sites More sharing options...
Ario.Paxaz Posted November 9, 2017 Author Share Posted November 9, 2017 Hi The Report that attached in Test Case,is very simple.I write in it Hello UniGui. But I have above problem. Best Regards. Link to comment Share on other sites More sharing options...
jahlxx Posted November 14, 2017 Share Posted November 14, 2017 As commente in this forum, the problem is the order of doing tings: I do like this, and works in isapi without any problem: procedure Tlibr.report(xr: string);var rpt: TfrxReport; exp: TfrxPDFExport; xreport: string;begin xreport := 'test.pdf'; exp := TfrxPDFExport.create(self); rpt := TfrxReport.Create(self); rpt.Clear; rpt.EngineOptions.DestroyForms := False; rpt.EngineOptions.SilentMode := True; rpt.EngineOptions.UseGlobalDataSetList := False; rpt.EngineOptions.EnableThreadSafe := True; rpt.PrintOptions.ShowDialog := False; rpt.PreviewOptions.AllowEdit := False; rpt.ShowProgress := False; exp.ShowDialog := False; exp.ShowProgress := False; exp.OverwritePrompt := False; exp.Background := True; exp.EmbeddedFonts := True; exp.FileName := UniServerModule.StartPath + 'files\tmp\' + xreport; exp.DefaultPath := ''; rpt.LoadFromFile(UniServerModule.StartPath +'rep\' + xr); rpt.PrepareReport; rpt.Export(exp); UniSession.SendFile(UniServerModule.StartPath + 'files\tmp\' + xreport,xreport);end; Hope this help you. Link to comment Share on other sites More sharing options...
Administrators Farshad Mohajeri Posted November 15, 2017 Administrators Share Posted November 15, 2017 Hi The Report that attached in Test Case,is very simple.I write in it Hello UniGui. But I have above problem. Best Regards. Can you test your report with one of our FastReport demos? Can you reproduce them in our FR demos as well? Link to comment Share on other sites More sharing options...
Recommended Posts
Please sign in to comment
You will be able to leave a comment after signing in
Sign In Now