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

Вниз

TWordApplication   Найти похожие ветки 

 
MZ ©   (2002-03-03 21:56) [0]

Кто-нибудь знает, что нужно сделать чтобы при отключении от серверного приложения оно не закрывалось.


 
Shaman_Naydak ©   (2002-03-04 12:00) [1]

Видать сильно мучает Михаилов этот вопрос.
Если сервер твой на дельфях
возьми сделай обработчик event у СomServer.OnLastRelease
его вид: TLastReleaseEvent = procedure(var Shutdown: Boolean) of object;

ComServer вызовет его при уничтожении последнего активного ком-объекта на сервере.
Если Shutdown по выходу будет False, то не закроется..



Можно это сделать и с клиентской стороны, хотя и не совсем корректно
uses ActiveX;
var ClassFactory: IClassFactory;
begin
OleCheck(CoGetClassObject(FControlData^.ClassID, CLSCTX_INPROC_SERVER or
CLSCTX_LOCAL_SERVER, nil, IClassFactory, ClassFactory));
ClassFactory.LockServer(True); // Блокируешь сервер. Фактически, чтобы он выгрузился надо вызвать с параметром False.
end;


Некорректность в том, что вызовы LockServer должны быть сбалансированы..
то есть в общем-то надо бы когда-нидь вызвать его и с параметром False


 
Shaman_Naydak ©   (2002-03-04 12:17) [2]

Я в общем-то невнимательно прочел subj и ответил в общем.
А по поводу WordAppication.
Разве WordAppication.AutoQuit:=False этого не делает..
Закрываешься Disconnect"ом


 
MZ ©   (2002-03-04 14:43) [3]

Не знаю может быть у меня что-то не так, но он закрывается с любым AutoQuit. Т.е. есть активный документ, подрубаешься к Ворду, поработал с ним, Disconnect и он пытается закрыться.


 
MZ ©   (2002-03-04 14:45) [4]

Не знаю может быть у меня что-то не так, но он закрывается с любым AutoQuit. Т.е. есть активный документ, подрубаешься к Ворду, поработал с ним, Disconnect... и он пытается закрыться.



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

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

Наверх




Память: 0.47 MB
Время: 0.012 c
3-17475
rvs
2002-04-12 10:41
2002.05.06
Tquery


1-17541
Kuks
2002-04-24 03:33
2002.05.06
Как выделить создать массив на n указателей?


14-17686
vopros
2002-03-29 13:48
2002.05.06
Задача: Есть база данных InterBase отдела кадров.


1-17536
cad
2002-04-23 21:49
2002.05.06
Таблицы RTF !!СРОЧНО!!


1-17582
DeMoN-777
2002-04-21 19:04
2002.05.06
Есть-ли в Delphi5 Функция sound как в Паскале ?