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

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

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

TService и че с ним делать [D7, WinXP]

DenXi © (2006-01-24 01:09:00)
Дело такое: пишу сервис с использованием TService. Нада, чтобы иногда казал Word и пихал туда текст.
В обычном TApplication работает, в сервисе - нет. Выполнял и в потоке, и по-всякому - не рулит, просто не работает и все!!! Кручу в цикле в Execute(если что). Interactive тож сделал - ничче не помогает!

Хотя нет работает beep :))) и все, доходит до Word.Documents и т.п. - исключение и циклу конец! Че делать????

Заранее благодарен

DenXi (2006-01-25 13:52:00) [1]

>
> Digitman ©

Понял, то есть в потоке все проблемы, как в C++, возлагаются на программиста....... Ясно... Спасибо!!!!!!!

Digitman (2006-01-25 08:40:00) [2]

> почему в TAppliaction работало

Потому что Борланд позаботился о неявной инициализации в контексте основногокод.потока VCL-приложения.

В твоем же случае у тебя используется дополнительный код.поток, а в этом случае об инициализации надо заботиться явно.

DenXi (2006-01-25 00:05:00) [3]
но, все равно спасиба! ошибку свою понял, надо получше с COM разобраться.... Но странно, почему в TAppliaction работало, значит, там уже заранее инициализированный COM?

DenXi (2006-01-24 23:57:00) [4]
Кстати, почему у мя только ComObj.CoInitializeEx, и каким должен быть второй параметр при инициализации/деинициализации, а CoUniti.... у меня ваще нет!

Digitman (2006-01-24 09:26:00) [5]
CoInitialize(nil);
try
try
WordApp := CreateOleObject('Word.Application');
try
.. работа с объектами Ворда ..
finally
WordApp.Quit;
end;
except
on e:EOleSysError do протоколирование исключения для последующего анализа
end;
finally
CoUninitialize;
end;

Anatoly Podgoretsky (2006-01-24 09:11:00) [6]
И чего это в сервисе делает показ, кто его увидит то.

Digitman (2006-01-24 08:18:00) [7]

> исключение

секретное ?)

Atheist (2006-01-24 07:17:00) [8]
Код дадите?

Наверх

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