[Galchonok]

Задали нам объединение N XLS файлов в 1 файл PDF.

Код:

Var XL1: variant;

begin
....

XL1 := CreateOleObject('Excel.Application');
XL1.DisplayAlerts := false;
XL1.WorkBooks.Open('1.xls');
...
XL1.ActiveWorkBook.SaveAs('new1.xls');
...
end.

В новых версиях Excel умеет сохранять данные и в PDF, только вот как это сделать из Delphi?

Конструкция:

Код:

XL1.ActiveWorkBook.SaveAs('new1.pdf', wdFormatPDF{17});

почему-то не работает, сохраняет файл формата XLS только с разрешением PDF. Может кто уже сталкивался с подобной проблемой сохранения и подскажет?