Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.11.05;
Скачать: [xml.tar.bz2];

Вниз

вопрос по 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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.058 c
2-1161617796
mahab
2006-10-23 19:36
2006.11.05
jpeg


2-1161674043
m-kirill-2003
2006-10-24 11:14
2006.11.05
Связь Delphi c MSAcces


4-1143738791
mlm68
2006-03-30 21:13
2006.11.05
Как сделать программное безопасное извлечение флешки?


2-1161406425
Insane SPIRIT
2006-10-21 08:53
2006.11.05
Перенос по словам в TStringGrid


15-1161055357
Slider007
2006-10-17 07:22
2006.11.05
С днем рождения ! 17 октября





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский