Вниз
Скачать: CL | DM;

TService и че с ним делать   Найти похожие ветки 

← →
DenXi ©   (2006-01-24 01:09) [0]

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

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

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


← →
Atheist   (2006-01-24 07:17) [1]

Код дадите?


← →
Digitman ©   (2006-01-24 08:18) [2]


> исключение


секретное ?)


← →
Anatoly Podgoretsky ©   (2006-01-24 09:11) [3]

И чего это в сервисе делает показ, кто его увидит то.


← →
Digitman ©   (2006-01-24 09:26) [4]

CoInitialize(nil);
try
 try
  WordApp := CreateOleObject("Word.Application");
  try
    .. работа с объектами Ворда ..
  finally
    WordApp.Quit;
  end;
 except
   on e:EOleSysError do протоколирование исключения для последующего анализа      
 end;
finally
CoUninitialize;
end;


← →
DenXi ©   (2006-01-24 23:57) [5]

Кстати, почему у мя только ComObj.CoInitializeEx, и каким должен быть второй параметр при инициализации/деинициализации, а CoUniti.... у меня ваще нет!


← →
DenXi ©   (2006-01-25 00:05) [6]

но, все равно спасиба! ошибку свою понял, надо получше с COM разобраться.... Но странно, почему в TAppliaction работало, значит, там уже заранее инициализированный COM?


← →
Digitman ©   (2006-01-25 08:40) [7]


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


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

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


← →
DenXi ©   (2006-01-25 13:52) [8]


>
> Digitman ©  


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



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.026 c
1-1135438529
Yegorchic
2005-12-24 18:35
2006.02.12
Завершение процесса в ring0


5-1124352966
Stanislav
2005-08-18 12:16
2006.02.12
В Наследнике TScrollBox периписать процедуру скроллинга


3-1134137909
Jmen
2005-12-09 17:18
2006.02.12
IBX и FB 1.5


15-1137928997
Kerk
2006-01-22 14:23
2006.02.12
Google Books


2-1137969372
Mad_Bob
2006-01-23 01:36
2006.02.12
Одни и те же процедуры, а эффект разный




   Наверх