VPF::Завершить работу Excel - Форум программистов

mspuz

Дата 7.6.2007, 10:05 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 304
Регистрация: 20.6.2005
Где: Ногинск

Репутация: нет
Всего: нет

Работаю с Excel через com. При завершении работы пишу следующее

Код


 Excel.DisplayAlerts := False;
 Excel.Application.ActiveWorkbook.SaveAs(DM.OpenDialog1.FileName);
 Excel.ActiveWorkbook.Close(SaveChanges := False);
 Excel.Application.Quit;

Но в процессах всё равно остаётся висеть процесс EXCEL и пользователь не может открыть созданый файл xls, пока не закроет программу! Что неправильно???

Poseidon

Дата 7.6.2007, 10:19 (ссылка)

(нет голосов)

Загрузка ...

Delphi developer

Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: нет
Всего: 133

Попробуй не
Excel.Application.Quit;
а
Excel.Quit;

--------------------

Если хочешь, что бы что-то работало - используй написанное,
если хочешь что-то понять - пиши сам...

mspuz

Дата 7.6.2007, 10:33 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 304
Регистрация: 20.6.2005
Где: Ногинск

Репутация: нет
Всего: нет

Poseidon, Неа, не работает smile

Poseidon

Дата 7.6.2007, 10:37 (ссылка)

(нет голосов)

Загрузка ...

Delphi developer

Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: нет
Всего: 133

Как вызываешь Эксель?

--------------------

Если хочешь, что бы что-то работало - используй написанное,
если хочешь что-то понять - пиши сам...

mspuz

Дата 7.6.2007, 15:11 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 304
Регистрация: 20.6.2005
Где: Ногинск

Репутация: нет
Всего: нет

Код


 Excel := CreateOleObject('Excel.Application');
 Excel.Visible := False;
 Excel.WorkBooks.Add;

Rennigth

Дата 7.6.2007, 15:48 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 1708
Регистрация: 21.6.2004
Где: Moscow

Репутация: нет
Всего: 76

mspuz,
А workBook-и Close-шь? Вроде надо.

Код


WorkBook.Close(EmptyParam, EmptyParam, EmptyParam, 0)

Это сообщение отредактировал(а) Rennigth - 7.6.2007, 15:49

--------------------

(* Honesta mors turpi vita potior *)

SilentRoach

Дата 3.8.2007, 08:11 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 20
Регистрация: 18.4.2006

Репутация: нет
Всего: нет

Код


Excel := unassigned;

и Variants добавить в uses

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: ActiveX/СОМ/CORBA \| Следующая тема »