mORMot Open Source

I'm using the above (Delphi 7, Quickreport 3 and Teechart 7.04) to output a chart (and some text) to a PDF file.

I'm using the code as quoted below. What happens is that the chart from TeeChart is looking different from the one on screen. Especially the series line width looks different, the line width in the PDF always seems to be 1 while I'm actually using a width of 3.

If I print the report to a PDF printer driver (Bullzip) the PDF looks OK.

What could I do about this, so that the output of synpdf also looks ok?

Code below:

procedure TForm8.Button2Click(Sender: TObject);   (* V3.00: PDF output *)
var
    vpdf : TPdfDocumentGDI;
    pagemeta : TMetafile;
    p : integer;
begin
    vpdf := TPdfDocumentGDI.Create(true, 1252,false);
    vpdf.CompressionMethod := cmNone;
    QuickRep1.prepare;
    for p := 1 to QuickRep1.QRPrinter.PageCount do
    begin
      vpdf.AddPage;
      pagemeta := QuickRep1.QRPrinter.GetPage(p);
      vpdf.VCLCanvas.Draw(0,0,pagemeta);
    end;
    vpdf.SaveToFile('Graph.pdf');
    vpdf.free;
end;