Показать сообщение отдельно
  #7  
Старый 21.05.2017, 19:21
derekt derekt вне форума
Прохожий
 
Регистрация: 18.05.2017
Сообщения: 6
Версия Delphi: delphi 7
Репутация: 10
По умолчанию

Цитата:
Сообщение от lmikle
Не так - код надо в посте правильно оформлять.

По поводу кода. У меня вот это работает:
Код:
procedure TForm1.Button1Click(Sender: TObject);
const
  xlWorkbookDefault = 51;
var
  Excel : OleVariant;
begin
  Excel := CreateOleObject('EXCEL.Application');
  Excel.Application.Workbooks.Add;
  Excel.Application.Workbooks[1].SaveAs('C:\Users\Michael Nilov\Documents\test.xls', xlWorkbookDefault);
  Excel.Application.Quit;
  Excel := null;
end;
Delphi 7, Office 2003 Rus

Подскажите пожалуйста как сделать чтобы не выскакивало окно подтверждения сохранения ? А еще если нажать отмену сохранения - то вылетает ошибка.
Ответить с цитированием