Пытаюсь разобраться по работе 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 .....
К сожалению нет установленного Delphi. Но, судя по ошибке, Вы не указываете все параметры функции.
У Вашей функции SaveWorkBook 2 параметра. Первый — имя файла, второй номер листа в книге Excel.
Вызов примерно такой:
SaveWorkBook('File.xls', 1);
Добрый день. Меня заинтересовал ваш ответ "К сожалению нет установленного Delphi. Но, судя по ошибке, Вы не указываете все параметры функции.
..." на вопрос http://www.liveexpert.org/topic/view/2459261-pitayus-razobratsya-po-rabote-delphi-s-tablicami-excel-voznikli-problemi-s-ispolzovaniem-nekotorih-funkcij-sobstvenno-sami-funkcii-moduli. Можно с вами обсудить этот ответ?