| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
вопрос по Excel
hom © (2006-10-17 18:40:00)Добрый день всем!
при создании отчетов на Еxcel есть такое такое дело как
DisplayAlerts
если ему присвоить False, то при работе с Excel не будут отображаться
всякие сообщения от Excel(типа подтверждения на сохранение или на перезапись), а как можно к таким сообщениям обратиться через Delphi?
например программно выбирать Yes или No на таких сообщениях?
EvS (2006-10-17 20:56:00) [1][5] EvS © (17.10.06 20:51) это если нужно сохранять именно под таким именем
чтобы не было вопросов от Excelя можно написать
XLAp.Workbooks[1].Close(0);
EvS (2006-10-17 20:51:00) [2]
If FileExists(filename) then
XLAp.Workbooks[1].Save
else
XLAp.WorkBooks[1].SaveAs (filename);
XLAp.Workbooks[1].Close;
XLAp.Quit;
YurikGL (2006-10-17 20:35:00) [3]
> то при закрытии Excel появляется сообщение заменить имеющийся
> файл или нет?
Проще использовать функцию
Delphi syntax:
function FileExists(const FileName: string): Boolean;
C++ syntax:
extern PACKAGE bool __fastcall FileExists(const AnsiString FileName);
Description
FileExists returns true if the file specified by FileName exists. If the file does not exist, FileExists returns false.
umbra (2006-10-17 20:28:00) [4]а не проще ли сохранять под именем, которого точно нет?
ян (2006-10-17 19:44:00) [5]дело в том, что после создания отчета надо решить, оставить его или нет.
если я в конце программы пишу
E.WorkBooks.SavaAs('filename');
E := Unassigned;
то при закрытии Excel появляется сообщение заменить имеющийся файл или нет?
нажимаешь да - он сохраняет, освобождает память, но
если нажимаешь "нет" - всё : метод SaveAs завершен неверно и уже он не освобождает память.
Пробовал отключать Alerts, и сделать с помощью MessageBox,
но ничего внятного так не получилось...
EvS (2006-10-17 19:27:00) [6]А нафига?
| |
