Показать сообщение отдельно
  #5  
Старый 10.01.2010, 01:11
Аватар для AND_REY
AND_REY AND_REY вне форума
Активный
 
Регистрация: 31.03.2009
Адрес: Украина, г.Днепропетровск
Сообщения: 324
Версия Delphi: Delphi7
Репутация: 3877
По умолчанию

Разобрался, самый простой пример:
Код:
uses 
 ComObj;
procedure TForm1.Button1Click(Sender: TObject);
Var
 E: Variant;
begin
 E:= CreateOleObject('Excel.Application');
 E.DisplayAlerts:= False;
 E.Workbooks.Add;
 E.WorkBooks[1].WorkSheets[1].Cells[6,4]:= 'Ку-ку.';
 E.ActiveWorkbook.SaveAs('C:\Пример.xls');
 E.Quit;
end;
Ответить с цитированием