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

Вниз

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

← →
Serge_Blockirator   (2002-10-21 13:34) [0]

Подскажите, как превратить проект (1 форма) в сервис NT, например, используя модуль service.pas, выложенный на http://bonanzas.rinet.ru/r_servsock.htm

---

← →
Alexander ©   (2002-10-22 14:50) [1]

Проект превратить в сервис нельзя - надо писать с нуля программу, которая является сервисом.

---

← →
Vladimir Kladov   (2002-10-24 15:40) [2]

См. приложение Service Starter. Оно как раз любое приложение позволяет запустить как сервис.

---

← →
Lord Warlock ©   (2002-10-24 15:48) [3]

Простой пример, как превратить любой ехе в сервис

procedure TНазваниеСервисаService.ServiceExecute(Sender: TService);
var S: String;
hwndHandle : THANDLE;
begin
S:="file.exe";
WinExec(PChar(S),SW_SHOWMINNOACTIVE);
while not Terminated do
ServiceThread.ProcessRequests(True);
hwndHandle:=FindWindow(Nil, "Заголовок ехе файла");
if hwndHandle<>0 then
PostMessage(hwndHandle, WM_QUIT, 0, 0);
end;

Создается File-New...-Service Appication

---

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

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

Наверх

Память: 0.47 MB
Время: 0.011 c