Access violation at address 008ED5FE...read address 000000108

rbuser

Dear Friends,

When I create ppReport1 and show print preview and after that press
print button in print preview form then show this error:
Access violation at address 008ED5FE in module SCM.exe read address
000000108.
Also always show at address 08ED5FE and address 000000108.
I checked when if I did press print button with " LoadFromFile " have
not any error and when I did without " LoadFromFile " have it error.

///////// in below codes have error ///////////////////////
MainForm.ppDBPipeline1.Visible := True;
MainForm.ppDBPipelinePictureTable.Visible := True;
MainForm.ppDBPipelineFullRecord.Visible := False;
MainForm.spGetCardPicture.Close;
MainForm.spGetCardPicture.Parameters.ParamByName
('@siCard').Value:=MainForm.ADOTable1siCard.AsInteger;
MainForm.spGetCardPicture.Open;
MainForm.ppReport1.OnEndPage := nil;
MainForm.ppReportSingleSide.PrinterSetup.DocumentName := 'Sepehr Card
Maker' ;
MainForm.ppReportSingleSide.OutlineSettings.Visible := False;
MainForm.ppReportSingleSide.DeviceType := dtScreen;
MainForm.ppDBPipeline1.SkipWhenNoRecords := False ;
MainForm.ppDBPipelinePictureTable.SkipWhenNoRecords := False ;
MainForm.ppReportSingleSide.PreviewFormSettings.ZoomSetting :=
zsPercentage;
MainForm.ppDesignerSingleSide.ShowModal;

/////////// in below codes have not any error ////////////////////

MainForm.ppReport1.Template.FileName :=MainForm.ADOTable2path_report.AsSt
ring;
MainForm.ppReport1.Template.LoadFromFile;
MainForm.ppDBPipeline1.Visible := True;
MainForm.ppDBPipelinePictureTable.Visible := True;
MainForm.ppDBPipelineFullRecord.Visible := True;
MainForm.ppReport1.OnPreviewFormCreate :=
MainForm.ppReport1PreviewFormCreate;

MainForm.ppReport1.OnPrintingComplete:=MainForm.ppReport1PrintingComplete
;
MainForm.ppReport1.OnPrintDialogCreate :=
MainForm.ppReport1PrintDialogCreate;
MainForm.ppReport1.OnPrintDialogClose :=
MainForm.ppReport1PrintDialogClose;
MainForm.ppReport1.OnEndPage := MainForm.ppReport1EndPage; //
Watermark DEMO
MainForm.spGetCardPicture.Close;
MainForm.spGetCardPicture.Parameters.ParamByName
('@siCard').Value:=MainForm.ADOTable1siCard.AsInteger;
MainForm.spGetCardPicture.Open;
MainForm.ppReport1.PreviewFormSettings.ZoomSetting := zsPercentage;
MainForm.ppReport1.DeviceType := dtScreen;

MainForm.ppDesigner1.Form.BorderIcons:=MainForm.ppDesigner1.Form.BorderIc
ons-[biMinimize];
if (MainForm.ppDesigner1.TabSet.Tabs.Count = 3) then
MainForm.ppDesigner1.TabSet.TabIndex := 1; // select first
subreport
MainForm.ppReport1.PrinterSetup.DocumentName := 'Sepehr Card Maker' ;
MainForm.ppReport1.OutlineSettings.Visible := False;
MainForm.ppDBPipeline1.SkipWhenNoRecords := False ;
MainForm.ppDBPipelinePictureTable.SkipWhenNoRecords := False ;
MainForm.ppDesigner1.ShowModal;
////////////////////////////////////////////////////////////////

Regards,
Ali Abbasi



--- posted by geoForum on http://delphi.newswhat.com

nicocizik

Hi Ali,

At what point in the code below does the AV occur? If you trace into the
ReportBuilder source, where is the problem occuring?

--
Regards,

Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com

rbuser

Dear Nico,

I remove all code and I saw occurred error in only below code:
MainForm.ppDesignerSingleSide.ShowModal;

occuring?
Sorry which I ask What I trace into the ReportBuilder source? Please
help me.

Regards,
Ali Abbasi



--- posted by geoForum on http://delphi.newswhat.com

rbuser

Hi,

No boady find which help me?!

Regards,

Ali Abbasi




--- posted by geoForum on http://delphi.newswhat.com

nicocizik

Hi Ali,

At what point in the code below does the AV occur? If you trace into the
ReportBuilder source, (i.e. set your library path to \RBuilder\Source, and
your debugger to stop on exceptions) where is the problem occuring?

--
Regards,

Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com