Exportar RTF a PDF

[roman]

Sigues sin decir gran cosa. Pero bueno, si la pc dispone de ms word (alguna versión que ya tenga integrado la exportación a pdf) puedes hacer uso de esta rutina:

Código Delphi [-]
uses ComObj;

procedure Rtf2Word(const FileName: String);
const
  wdExportFormatPDF = 17;

var
  WordApp, Documento: OleVariant;
  OutputFileName: String;

begin
  OutputFileName := ChangeFileExt(FileName, '.pdf');
  WordApp := ComObj.CreateOleObject('Word.Application');
  Documento := WordApp.Documents.Open(FileName);
  Documento.ExportAsFixedFormat(OutputFileName, wdExportFormatPDF);
  WordApp.Quit;
end;

LineComment Saludos