Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Excel OLE [D7, Win2k]

AGGRESSOR © (2004-06-09 12:25:00)
ex:=CreateOleObject('Excel.Application');
...
ex.quit;
ex:=Unassigned;
А в списке процессов остается висеть EXCEL.EXE
Что скажите?

AGGRESSOR (2004-06-09 13:48:00) [1]
С этим я сейчас и пытаюсь разобраться. Хотя я причину и так знаю- я где-то ошибся и не так обработал какую-то ошибку. Бывает, когда не досыпаешь ночами.

Романов Р.В. (2004-06-09 13:39:00) [2]
Тогда почему раньше не работало? Что изменил?

AGGRESSOR (2004-06-09 13:19:00) [3]
В том-то и дело что не выкидывал я quit- при выполнении ex.quit excel пропадает из списка задач, а при ex:=Unassigned- из списка процессов. Все работает как часики :)

Романов Р.В. (2004-06-09 13:11:00) [4]
т.е. выкинул ex.quit; и все заработало?

AGGRESSOR (2004-06-09 13:08:00) [5]
Романов Р.В. ©,большое спасибо! Если посмотришь мой вопрос, то там увидишь, что я в конце ставил ex:=Unassigned; Странно другое- сейчас оно сработало как надо! :) Наверное глюки уже у меня :) Сенкс еще раз!

Amoeba (2004-06-09 13:05:00) [6]
http://www.delphikingdom.com/asp/viewitem.asp?catalogid=249
http://www.delphikingdom.com/asp/viewitem.asp?catalogid=272
http://www.delphikingdom.com/asp/viewitem.asp?catalogid=313

Amoeba (2004-06-09 13:04:00) [7]
Читай http://www.delphikingdom.com/asp/viewitem.asp?UrlItem=/helloworld/excel.htm

Романов Р.В. (2004-06-09 12:58:00) [8]
А так?
ex:=CreateOleObject('Excel.Application'); ... ex:=Unassigned;

AGGRESSOR (2004-06-09 12:54:00) [9]
Романов Р.В. ©, ничего не задает, все завершается корректно. Книга сохраняется, закрывается, но ЭКЗЕМПЛЯР остается. Ему ex.quit не помогает. И Finalize(ex) тоже. К тому же он потом мешает открываться другим книгам- прорисовывает на экране свою рамку, а книги не видно до тех пор, пока не срубишь экземпляр КАДом.

Романов Р.В. (2004-06-09 12:34:00) [10]
А он случайно вопросов никаких не задает? Например "Сохранить файл"

RoadStar (2004-06-09 12:31:00) [11]
try
Excel := CreateOleObject('Excel.Application')
except
ShowMessage('Нет доступа к серверу Excel');
Exit
end;

...

Excel.ActiveWorkbook.SaveAs(FileName, -4143, '', '', False, False);
Excel.Quit;
Finalize(Excel);

...

А у меня после таких манипуляций - нет!

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »