Shape data editor causes AV

[h.hasenack]

Hi

I have been playing around with the YCHart MapSeries, and successfully managed to load ESRI shapefiles into a mapseries.

Howerver, when I open the TCHartedtor to review my shape coordinates a crash is caused. I added the following lines to Chart.pas, in PaintSeriesLegend(....) to fix the crash.

Regards - Hans

Code: Select all

....
  if Assigned(OldCanvas3D) then
  begin
    {$IFNDEF AUTOREFCOUNT}
{$ifdef HH_PATCH_TC_SHAPEDITOR}
     if Assigned(ASeries)
       and Assigned(ASeries.ParentChart) then
{$endif}
    ASeries.ParentChart.Canvas.Free;

    {$ENDIF}

{$ifdef HH_PATCH_TC_SHAPEDITOR}
     if Assigned(ASeries)
       and Assigned(ASeries.ParentChart) then
{$endif}
    TCustomChart(ASeries.ParentChart).InternalCanvas:=OldCanvas3D;
....

[Yeray]

Hi,

Do you have a simple example so we can see in what exact circumstances there's a crash?

[h.hasenack]

Sample app, data and steps to reproduce mailed to support*at*steema.com

-----

• Compile the app (the provied exe already as my patches!)
• Use the app to load the provide shape file
• Open the chart editor, open map series
• Browse to the shapes list -> crash

[Narcís]

Sample app, data and steps to reproduce mailed to support*at*steema.com

Please send it to info at steema dot com with a reference to this thread. The support email address is disabled.

Thanks in advance.

[h.hasenack]

DOne

[Narcís]

Hello,

Thanks for your email. I could reproduce the bug (TV52016712) here and implemented your fix suggestion like this:

Code: Select all

  if Assigned(OldCanvas3D) and Assigned(ASeries.ParentChart) then
  begin
    {$IFNDEF AUTOREFCOUNT}
    ASeries.ParentChart.Canvas.Free;
    {$ENDIF}

    TCustomChart(ASeries.ParentChart).InternalCanvas:=OldCanvas3D;
  end;

[h.hasenack]

Thx. I guess it'' be in the official XE5 release then..

[Narcís]

Hello,

Yes!