Gantt series printing problems

[GeluHUN]

Hello!

There is an anomaly when printing Gantt series charts.

I have created an empty project with just one Chart, and added random data during runtime. The chart and the print preview are perfect, however printing the chart prints the pointer arrows to the wrong places. See the attached images, first is about the program, second is the print preview, third is scanned back from the printed paper.

Arrows are "created" with Marks visible, Pointers visible, and Pointer Style is right triangle.

gantt1.jpg (122.89 KiB) Viewed 3272 times

gantt2.jpg (135.76 KiB) Viewed 3269 times

gantt3.jpg (98.45 KiB) Viewed 3268 times

Can anyone help me, how to print the pointers right, or is this a bug in the chart?

Best regards,
Peter

[Yeray]

Hello Peter,

You are right. I've reproduced it with the code below, printing the chart through the "print" button in the commander and printing the chart with a pdf virtual printer (CutePDF writer). So I've added it to the defect list to be revised for future versions (TV52015575).

Code: Select all

uses GanttCh;

procedure TForm1.FormCreate(Sender: TObject);
begin
  Chart1.Legend.Visible:=false;
  Chart1.View3D:=false;

  with Chart1.AddSeries(TGanttSeries) do
  begin
    FillSampleValues(7);
    ColorEachPoint:=false;
    Marks.Visible:=true;
    Marks.Callout.Visible:=true;
    Marks.Callout.Style:=psRightTriangle;
  end;
end;

However, I've also seen that using the StretchDraw method here, it's printed correctly.

[GeluHUN]

Dear Yeray,

thank you for the reply.

Reading about the StretchDraw post, it seems that method can also be used to implement another demand I have from our customers: to print data in a grid beside the chart. Thank you very much!

Best regards,
Peter