mORMot Open Source

Hello MtwStark

Thank you for your work! I tested your version of SynPDF.pas and it works with all my EMFs very well!!

Unfortunately I never could use the original SynPDF.pas for EMF export, because about 90% of my EMFs contain clippings.
As a workaround I converted all EMF to BMP to create the PDF file, with the result that all graphics where correct but the size of the PDF file was gigantic!
With your version I could reduce the size of my biggest PDF file by factor 25 and the quality is even better!

I just can encourage other users to test this unit and hopefully Arnaud will merge this genius clipping enhancements into the original SynPDF.pas

Best regards
Tom

After digging into the EnumEMFFunc I see at least two problem areas concerning the emf conversion:

1. Clipping of geometric objects is not implemented (only rectangular clipping of a text is supported).
2. Rendering of chord/arc is not implemented.

http://sharesend.com/qummwept - EMF-File
http://sharesend.com/npm7mf9k - converted PDF with synopse

I used the following code to generate the PDF:

procedure TForm1.Button1Click(Sender: TObject);
var
  oPDF: TPdfDocumentGDI;
  oMeta: TMetaFile;
begin
 oPDF:= TPdfDocumentGDI.Create;
 oMeta:= TMetaFile.Create;
 try
   oMeta.LoadFromFile('c:\temp\test.emf');
   oPDF.AddPage;
   oPDF.Canvas.RenderMetaFile(oMeta, 1, 0, 0, tpExactTextCharacterPositining);
   oPDF.SaveToFile('c:\temp\test.pdf');
 finally
   oPDF.Free;
   oMeta.Free;
 end;
end;

Is this correct and are there plans to enhance these areas?

Best regards
Tom