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

Вниз

Остановка службы   Найти похожие ветки 

 
rezo   (2005-02-16 10:17) [0]

Нужно остановить службу, и изменить тип запуска
var
aa:cardinal;ess:TEnumServiceStatus;
begin
aa:=OpenService(OpenSCManager(nil,nil, SC_MANAGER_ALL_ACCESS),"RSVP",SERVICE_ALL_ACCESS);
ControlService(aa,SERVICE_CONTROL_STOP,ess.ServiceStatus);


ChangeServiceConfig(
      aa,        // дескриптор сервиса
      SERVICE_NO_CHANGE, // тип сервиса: нет изменений
      SERVICE_AUTO_START,       // меняем тип запуска сервиса
      SERVICE_NO_CHANGE, // контроль ошибок: нет изменений
      nil,              // путь сервиса: нет изменений
      nil,              // принадлежность к группе: нет изменений
      nil,              // --""--: нет изменений
      nil,              // зависимости: нет изменений
      nil,              // имя аккаунта: нет изменений
      nil,              // пароль: нет изменений
      nil)            // отображаемое имя: нет изменений

end;После чего служба останавливается, а тип запуска остается прежним. Что не так.Как быть?


 
rezo   (2005-02-16 10:37) [1]

всем спасибо заработалоооо



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

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

Наверх




Память: 0.46 MB
Время: 0.04 c
3-1106827702
Kat
2005-01-27 15:08
2005.02.27
Транзакции


1-1108021065
KingDog
2005-02-10 10:37
2005.02.27
вот знаете что то при n = 31 не считает


1-1108173517
Alex_Petr
2005-02-12 04:58
2005.02.27
Нужно ли закрывать Handle терминированного процесса ?


1-1108497153
Jeson
2005-02-15 22:52
2005.02.27
Помогите со Stringgrid ом


14-1107854809
Beginner_
2005-02-08 12:26
2005.02.27
А где в XP находится File Manager ?