Delphi怎么实现让Excel文件转pdf文件格式

Question

如题，我试了一些方法，还是没成功，转了pdf后文件就打不开
不用第三方控件，不用VBA，请问，有什么方法吗？ 就用代码实现转换文件到指定路径

Answer 1

delphi 自身没有转换PDF功能，又不用第三方控件，难上难。

Answer 2

excel 2010及以上自带了导出pdf,2007需要装个SaveAsPDFandXPS.exe（不到1M,很小的)
const xlPDF = 57;
FWorksheet.saveas(AFile,xlPDF); 如果2003及以下版，可安装doPDF虚拟打印机，
 ExcelApp.ActivePrinter :=’doPDF v7 在 DOP7:‘;
 ExcelApp.ActiveSheet.PrintOut;