| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

TExcelApplication

MaximusI ©   (2007-10-28 13:25:00) 

Делаю экспорт в эксель, для тестов делаю видимым окно ExcelApplication1.Visible[0] := True;

в конце экспорта сохраняю файл реузультата:
     ExcelApplication1.ActiveWorkBook.SaveAs(ChangeFileExt(FileName, '.xls'), xlWorkbookNormal, '', '', False, False, xlNoChange, xlLocalSessionChanges, False, EmptyParam, EmptyParam, EmptyParam, 0);
     ExcelApplication1.ActiveWorkbook.Close(False, EmptyParam, EmptyParam, 0);

Но при видимом окне получается, что если файл уже существует, происходит запрос в экселе: "Файл ... уже существует в данном месте. Заменить?"

Как можно избежать данного запроса?

---

Palladin   (2007-10-28 13:47:00) [1]

оно не имеет к сохранению никакого отношения... открой справку в Excel по VBA в частности по Excel.Application и наслаждайся

AlertBeforeOverwriting Property

True if Microsoft Excel displays a message before overwriting nonblank cells during a drag-and-drop editing operation. Read/write Boolean

---

MaximusI   (2007-10-28 13:34:00) [2]

Спасибо, помогло.

Я сначала увидел .AlertBeforeOverwritingдумал что это оно; но не помоголо, зачем тогда нужен AlertBeforeOverwriting?

---

Palladin   (2007-10-28 13:31:00) [3]

ExcelApplication1.DisplayAlerts:=False

---

Наверх