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

Вниз

А если Excel закрыт????   Найти похожие ветки 

 
Chuk45   (2004-10-08 12:18) [0]

Добрый день всем.
Подключаюсь так:
Excel := CreateOleObject("Excel.Application");
   Excel.Visible := True;

   WBk := Excel.WorkBooks.Open(ExcelPath);

   WS := WBk.Worksheets.Item["Лист1"];

Отключаюсь так:
WS:=Unassigned;
       WBk.Close;
       WBk:=Unassigned;
       Excel.Quit;
       Excel := Unassigned;

Но вот если Excel был закрыт до отключения, то вываливается ошибка "Вызываемый объект был отключён".

Как этого избежать/обработать (кроме, конечно, "не закрывай Excel до отключения" :))?


 
KSergey ©   (2004-10-08 12:24) [1]

Да никак и не обрабатывать.
Ну если уж так пугает - ну подавить try/except, хотя зачем? А может не отображать эксель просто? Дабы и закрыть-то его пользователь сам не мог...


 
Chuk45   (2004-10-08 12:25) [2]

К сожалению, отображать надо.


 
YurikGL ©   (2004-10-08 12:55) [3]


> Chuk45   (08.10.04 12:18)  

Советую делать так:
Подключился. Выбросил в ексель все что надо и сразу отключился. Если надо что-то еще выбрасывать - подключаемся вновь.


 
KSergey ©   (2004-10-08 13:02) [4]

К стати, у родного TExcelApp - нет ои чего-то вроде OnClose? (только как реализовать - не знаю; см. vcl)


 
Chuk45   (2004-10-08 13:55) [5]

YurikGL ©   (08.10.04 12:55) [3]
Я тоже хотел так сделать, но отключение:
      WS:=Unassigned;
      WBk.Close;
      WBk:=Unassigned;
      Excel.Quit;
      Excel := Unassigned;
выхывает диалог закрытия самого Excel"я.


 
KSergey ©   (2004-10-08 14:01) [6]

Ну дык убери WBk.Close и Excel.Quit  ;)


 
_iceman_ ©   (2004-10-08 16:11) [7]

if not VarIsEmpty(Excel) then
 Excel.Quit;



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

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

Наверх




Память: 0.48 MB
Время: 0.034 c
14-1096963030
Layner
2004-10-05 11:57
2004.10.24
Kodak выиграла иск о патентах на Java


11-1081879198
hammer
2004-04-13 21:59
2004.10.24
Фреймы в kol e


3-1096016649
slaviq
2004-09-24 13:04
2004.10.24
Несколько Datbase Name в TDatabase


9-1087757905
Inf_96
2004-06-20 22:58
2004.10.24
Ошибка при закрытии программы DirectX


1-1097551369
VAV
2004-10-12 07:22
2004.10.24
Контейнер для текстов