Пытаюсь разобраться по работе delphi с таблицами excel. Помогите !! - вопрос №2459261

Пытаюсь разобраться по работе delphi с таблицами excel. Возникли проблемы с использованием некоторых функций. Собственно сами функции:

Модули ComObj, ActiveX подключены.

var MyExcel: OleVariant; — глобальная переменная

1. Определяем запущен ли excel

function CheckExcelRun: boolean;
begin
try
MyExcel:=GetActiveOleObject(ExcelApp);
Result:=True;
except
Result:=false;
end;
end;

2.После создания рабочей книги функцией

function AddWorkBook(AutoRun:boolean=true):boolean;
begin
if CheckExcelRun then
begin
MyExcel.WorkBooks.Add;
Result:=true;
end
else
if AutoRun then
begin
RunExcel;
MyExcel.WorkBooks.Add;
Result:=true;
end
else
Result:=false;
end;

пытаюсь ее сохранить вызовом функции

function SaveWorkBook(FileName:TFileName; WBIndex:integer):boolean;
begin
try
MyExcel.WorkBooks.Item[WBIndex].SaveAs(FileName);
if MyExcel.WorkBooks.Item[WBIndex].Saved then
Result:=true
else
Result:=false;
except
Result:=false;
end;
end;

но компилятор выдает ошибку при вызове функции
Not enought actual parameters
Could not compile used unit .....
18.05.17
1 ответ

Ответы

К сожалению нет установленного Delphi. Но, судя по ошибке, Вы не указываете все параметры функции.
У Вашей функции SaveWorkBook 2 параметра. Первый — имя файла, второй номер листа в книге Excel.
Вызов примерно такой:
SaveWorkBook('File.xls', 1);
18.05.17
Посмотреть всех экспертов из раздела Технологии > Delphi
Пользуйтесь нашим приложением Доступно на Google Play Загрузите в App Store