Понимаю, можно написать .bat файл который будет вызываться из проги и гасить сервис, но можно ли это сделать более красиво, пряма напрямую из проги. Порывшись в WinApi функциях ничего не нашел. Возможно можно как-то послать сервису комманду, чтобы он сам заглушился ? Ведь когда винда выключается она должна нечто подобное проделывать. Отсюда вопрос, можно ли посылать сервису команды ?
Может кто подскажет где можно популярно почитать про сервисы и с чем их едят ?
Заранее спасибо.

| Сообщение посчитали полезным:

windwail пишет:
Может кто подскажет где можно популярно почитать про сервисы и с чем их едят ?
Ну если ты можешь "написать .bat файл который будет вызываться из проги и гасить сервис", то я думаю читать тебе ничего не надо... В чём проблема? "пряма напрямую из проги" можно также вызывать команды, как и из батника!

-----
z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh

| Сообщение посчитали полезным:

ну вот так можно

procedure UninstallService(ServiceName: pchar);
var
SCManager: SC_HANDLE;
Service: SC_HANDLE;
begin
SCManager := OpenSCManager(nil, nil, SC_MANAGER_ALL_ACCESS);
if SCManager = 0 then Exit;
Service := OpenService(SCManager, ServiceName, SERVICE_ALL_ACCESS);
ControlService(Service, SERVICE_CONTROL_STOP, Status);
DeleteService(Service);
CloseServiceHandle(Service);
CloseServiceHandle(SCManager);
end;

-----
[nice coder and reverser]

| Сообщение посчитали полезным:

а если нужны именно команды из bat, то
1. Можно использовать WinExec, но появляется окно консоли, а это не красиво (но иногда приемлимо).
2. ShellExecute(Handle,'open',PChar(FileName),PChar(Parameters),nil,SW_HI DE);
где:
PChar(FileName) - путь к программе
PChar(Parameters) - параметры командной строки
SW_HIDE - запуск в скрытом режиме

-----
z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh

| Сообщение посчитали полезным:

Круто!
Спасибо большое за ценную инфу!

| Сообщение посчитали полезным:

Можно вообще без всяких батников и SCManager'ов

ShellExecute(handle,'open',net','stop spooler',nil,sw_hide);

| Сообщение посчитали полезным: