Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Запуск сервиса


Страницы:   1 2

Tonich ©   (2007-10-02 11:46:00) 

Есть проблема с запуском сервиса. При его создании указывают имя сервиса от которого зависит мой сервис. а когда запускаю свой говорит что зависимый сервис либо отсутствует либо отмечен как удаляемый, хотя на самом деле он запущен и работает... кто-то сталкивался с таким?


Сергей М.   (2007-10-03 08:22:00) [21]

И с каким периодом тикает таймер ?


Tonich   (2007-10-02 16:58:00) [22]

правда написанно на бильдаре
// Service Status Structures    _SERVICE_STATUS ServiceStatus;

void __fastcall TfrmHotel::TimerSvcStatusTimer(TObject *Sender)
{
try
 {
  try
   {
    ServiceStatus = GetServiceStatus();
   }
  __finally
   {SetSatatusBarLine(sbServiceSts,GetServiceStatusDesc(ServiceStatus.dwCurrentStat e));}
 }
catch(Exception &Ex)
 {
  return;
 }
}

GetServiceStatus() в ней вызывается  написанная на паскале уже  function QueryStatus

function TbtSvcMan.QueryStatus(const Name: string; var SS: TServiceStatus): boolean;
var
 hSvc         : SC_HANDLE;
begin
 Result := False;
 if not Initialized then Exit;
 hSvc   := OpenService (hSCMan, PChar(Name), SERVICE_ALL_ACCESS);
 if hSvc = 0 then Error('Can not access service: %s', [Name]);
 Result := QueryServiceStatus(hSvc, SS);
 CloseServiceHandle(hSvc);
end;


вот собсвенно и все..


Сергей М.   (2007-10-02 16:46:00) [23]


> в таймере идет ежесекундно опрос состояния сервиса


Показывай код ..


Tonich   (2007-10-02 16:25:00) [24]

то есть не сервера а сервиса


Tonich   (2007-10-02 16:23:00) [25]

нашел ошибку, только не понятно, почему из-за нее не запускается сервер, у меня в таймере идет ежесекундно опрос состояния сервера, так вот если убрать это опрос, то все ставится и запускается корректно... чего так?


Tonich   (2007-10-02 15:20:00) [26]

ну имя конечно у него другое,  но это сервис этого сервера


Tonich   (2007-10-02 15:19:00) [27]

FireBird 1.5


clickmaker   (2007-10-02 15:13:00) [28]


> так что кроме неправильного имени ничего не может быть?

"зависимый сервис либо отсутствует либо отмечен как удаляемый"

что за сервис-то, от которого зависит? Из стандартных?


Tonich   (2007-10-02 15:04:00) [29]

так что кроме неправильного имени ничего не может быть?


Tonich   (2007-10-02 11:52:00) [30]

а кстати там же если неправильно указать имя то в закладке сервиса (dependencies) не появится ни одного сервиса.. не так ли?


Tonich   (2007-10-02 11:50:00) [31]

то есть проблема может быть только в неправильном имени, и ни в чем больше?


Tonich   (2007-10-02 11:49:00) [32]

а что самое интересно яж это делал а потом убрал, а теперь не получается вернуть обратно ..


Tonich   (2007-10-02 11:49:00) [33]

вот только хотел дописать , ен успел, имя проверял уже не один раз


clickmaker   (2007-10-02 11:48:00) [34]


> Tonich ©   (02.10.07 11:46)

может, неправильно указал имя?


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо