Задали нам объединение 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. Может кто уже сталкивался с подобной проблемой сохранения и подскажет?