Главная страница
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.036 c
1-1097551369
VAV
2004-10-12 07:22
2004.10.24
Контейнер для текстов


14-1097047755
RDen
2004-10-06 11:29
2004.10.24
Иероглифы при копировании через буфер


1-1097260214
saypn
2004-10-08 22:30
2004.10.24
Зацикливание программы


1-1097178595
dms_main
2004-10-07 23:49
2004.10.24
Application.minimize


11-1081703207
4kusNick
2004-04-11 21:06
2004.10.24
Как включить перенос по словам (WordWrap) в RichEdit?