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

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

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

Помогите с отключем службы (Services) [D5, NT4, Win2k, WinXP]

[BAD]Angel © (2003-03-05 21:40:00)
Подскажите ПЛЗ, как отключить (или получить список запущенных служб в win2000?
Отключить было бы лучше...

Заранее спасибо!

Безымянное среднего рода (2003-03-07 18:02:00) [1]
BOOL ControlService(

SC_HANDLE hService, // handle to service
DWORD dwControl, // control code
LPSERVICE_STATUS lpServiceStatus // pointer to service status structure
);

procedure TMainForm.AcStopExecute(Sender: TObject);
var
SvcStatus: TServiceStatus;
begin
if hSvc <> 0 then
begin
if not ControlService(hSvc, SERVICE_CONTROL_STOP, SvcStatus) then
begin
//check error
end;
WaitForServiceStatus(SERVICE_STOPPED);
end;
end;

ZZ (2003-03-07 16:31:00) [2]
мда... мастре тут еще те :(
Вот ведь гады - код никто не дает... совсем обнаглели эти мастре

[BAD]Angel (2003-03-07 12:21:00) [3]
мда... мастре тут еще те :(

[BAD]Angel (2003-03-06 22:24:00) [4]
чёй-то нету этого в хелпе :( можно примерчиком?

ZZ (2003-03-06 00:35:00) [5]
Открой хелп, например, на функции CreateService и посмотри список других функций, почитай описание...

ЗЫ. EnumServicesStatus - список сервисов
функцией ControlService - можно остановить сервис
DeleteService - удалить
ChangeServiceConfig - изменить настройки

[BAD]Angel (2003-03-05 22:12:00) [6]
Ау!!! :(

Наверх

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