mORMot Open Source

Is SynPdf  compatible with Delphi 12 ? and Where is a Demo example        ?

I should convert a basic HTML to PDF (Datasnap server).

I have found this, for load a basic html ?

  with TGDIPages.Create(self) do
  try

    BeginDoc;
    MF := TMetafile.Create;
    MF.LoadFromFile('xxxxxxxxxxxxxxxxxxxxxxxx.emf');
    DrawGraphic(MF,0,PaperSize.cx-20);
{    for y := 0 to 4 do
    begin

      DrawTitle(edt1.Text, true);
      for i := 1 to 10 do
        DrawText('This is some text ' + IntToStr(i));
      NewLine;

      TestImage := TBitmap.Create;
      try
        TestImage.Width := 500;
        TestImage.Height := 500;

        TestImage.Canvas.Pen.Color := clRed;
        TestImage.Canvas.MoveTo(0, y * 80);
        TestImage.Canvas.LineTo(TestImage.Width, y * 80);

        DrawBMP(TestImage, maxInt, RightMarginPos);
      finally
        TestImage.Free;
      end;

      NewPage;
    end;}

    EndDoc;
    ForceInternalAntiAliased := true;
    ForceInternalAntiAliasedFontFallBack := true;
    ExportPDFGeneratePDF15File := true;
    ExportPDFUseUniscribe := true;
    ShowPreviewForm;
    //ExportPDF('test.pdf', true, true);
  finally
    Free;
  end;