Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.11.05;
Скачать: CL | DM;

Вниз

вопрос по Excel   Найти похожие ветки 

 
hom   (2006-10-17 18:40) [0]

Добрый день всем!
при создании отчетов на Еxcel есть такое такое дело как
DisplayAlerts
если ему присвоить False, то при работе с Excel не будут отображаться
всякие сообщения от Excel(типа подтверждения на сохранение или на перезапись), а как можно к таким сообщениям обратиться через Delphi?
например программно выбирать Yes или No на таких сообщениях?


 
EvS ©   (2006-10-17 19:27) [1]

А нафига?


 
ян   (2006-10-17 19:44) [2]

дело в том, что после создания отчета надо решить, оставить его или нет.
если я в конце программы пишу

E.WorkBooks.SavaAs("filename");
E := Unassigned;

то при закрытии Excel появляется сообщение заменить имеющийся файл или нет?
нажимаешь да - он сохраняет, освобождает память, но
если нажимаешь "нет" - всё : метод SaveAs завершен неверно и уже он не освобождает память.
Пробовал отключать Alerts, и сделать с помощью MessageBox,
но ничего внятного так не получилось...


 
umbra ©   (2006-10-17 20:28) [3]

а не проще ли сохранять под именем, которого точно нет?


 
YurikGL ©   (2006-10-17 20:35) [4]


> то при закрытии 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.


 
EvS ©   (2006-10-17 20:51) [5]

If FileExists(filename) then
XLAp.Workbooks[1].Save
else
XLAp.WorkBooks[1].SaveAs (filename);
XLAp.Workbooks[1].Close;
XLAp.Quit;


 
EvS ©   (2006-10-17 20:56) [6]

[5] EvS ©   (17.10.06 20:51) это если нужно сохранять именно под таким именем
чтобы не было вопросов от Excelя можно написать
XLAp.Workbooks[1].Close(0);



Страницы: 1 вся ветка

Текущий архив: 2006.11.05;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.057 c
15-1160607272
Бабай
2006-10-12 02:54
2006.11.05
Google Code Search не ищет по Паскалю !


15-1161192320
ArtemESC
2006-10-18 21:25
2006.11.05
Запутался с Реестром Far a...


15-1160782877
ИА
2006-10-14 03:41
2006.11.05
Бесплатный софт


8-1143532496
kmi
2006-03-28 11:54
2006.11.05
Как сохранить TBitmap в jpg-файл с разрешением 300 dpi


15-1161106213
Nic
2006-10-17 21:30
2006.11.05
Выбрал телефон