Convertir archivos de imagen BMP al formato de documento PDF

[dec]

Hola,

Aparte de lo dicho por Daniel, otra posible solución sería usar Synopse PDF engine, un conjunto de unidades para Delphi que permite crear documentos y/o reportes PDF. Para "convertir" un archivo Bitmap a un archivo PDF podría escribirse algo similar a esto:

Código Delphi [-]
{...}

uses
  // SynopsePDF
  mORMotReport;

procedure Bitmap2Pdf(const BitmapPath, OutputPDFPath: string);
var
  BMP: TBitmap;
  PDF: TGDIPages;
begin
  BMP := TBitmap.Create();
  PDF := TGDIPages.Create(nil);
  try
    PDF.BeginDoc();
    BMP.LoadFromFile(BitmapPath);
    PDF.DrawBMP(BMP, 0, BMP.Width div 3);
    PDF.EndDoc();
    PDF.ExportPDF(OutputPDFPath, False, True);
  finally
    BMP.Free();
    PDF.Free();
  end;
end;

{...}

procedure TForm1.Button1Click(Sender: TObject);
begin
  Bitmap2Pdf('sample.bmp', 'sample.pdf');
end;