Функции для создавания и удаления NT Services. Можно создать NT Service от текущее приложение. Параметры:

1. CreateNTService(ExecutablePath,ServiceName: String)

ExecutablePath - Полный путь к изполнимого файла от которого создавается NT Service

ServiceName - Имя сервиза которое отобразится в Service Control Manager

Результат:

true - если операциая завершена успешно

false - если есть ошибка. Можно произвести call то GetLastError чтобы информироваться об естество ошибки

2. DeleteNTService(ServiceName: String):boolean;

ServiceName - имя сервиза подлежающии удаления

Результат:

true - если операциая завершена успешно

false - если есть ошибка. Можно произвести call то GetLastError чтобы информироваться об естество ошибки

В принципе и так все понятно - задаешь название привилегии и, если это возможно, система их тебе дает.

 

 

1. Предисловие.

Приветствую всех любителей Delphi! В этой статье я хочу поведать вам об одной из замечательных, с моей точки зрения, технологии, разработанной Microsoft для облегчения нашей жизни. Теперь любой программист, используя любой современный язык программирования (не исключая и скрип языков!) может с лёгкостью узнать о своём компьютере практически всё. Теперь программисты всех "вероисповеданий" могут определить, какое оборудование установлено на их компьютере, узнать информацию о материнской плате и процессоре, параметры БИОСа, какие процессы запущены в данный момент, какова температура процессора и скорость вращения кулера, какие настройки графической системы, какие. Одним словом, все о чём вы так долго мечтали, стало доступно благодаря WMI. Звучит заманчиво, не так ли? Естественно, что WMI - это не только набор параметров. А что это такое - читайте ниже.