![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Excel сохранение
Дима © (2004-11-03 09:43:00)я делаю так:
procedure CreateExcelDoc(FileName: String);
var
XL: Variant;
begin
XL := CreateOLEObject('Excel.Application'); // Создание OLE объекта
XL.WorkBooks.add(ExtractFilePath(Application.ExeName) + 'каталог.xlt');
DataModule2.Base.First;
while not DataModule2.Base.Eof do
begin
XL.Range['A' + IntToStr(j+1)].Value := DataModule2.BaseTitle.AsString;
DataModule2.Base.Next;
end;
XL.ActiveWorkbook.SaveCopyAs(FileName);
XL.ActiveWorkbook.Close;
FileName - сохраняется, а 'каталог.xlt' выдает что он изменен. Подскажите как отключить вывод запроса на сохранение 'каталог.xlt'
Symb (2004-11-03 14:03:00) [1]Смотри параметры Close.