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

Вниз

Как зарегистрировать и запустить/остановить службу?   Найти похожие ветки 

 
lexusU   (2005-01-02 16:04) [0]

следущая ситуация. Мне необходимо получить дамп CMOS памяти, с последующей записью в определеные регистры некого значения. Как всем известно в НТ системах прямое обращение к CMOS регистрам невозможно. Однако существует некий (довольно популярный) драйвер giveio, с помощью которого возможно это проделать. Для этого  необходимо запустить эту службу, произвести считывание/запись из регитсров, остановить службу.Мои попытки к нормальной работе не привели. Может кто занимался этим? Или етсь какие нибудь исходники?


 
GanibalLector ©   (2005-01-03 00:05) [1]

Что-то типа :

var
aa:cardinal;ess:TEnumServiceStatus;
begin
aa:=OpenService(OpenSCManager(nil,nil, SC_MANAGER_ALL_ACCESS),"SmcService",SERVICE_ALL_ACCESS);
ControlService(aa,SERVICE_CONTROL_STOP,ess.ServiceStatus);
CloseServiceHandle(aa);

выделенное заменить на свое!


 
GanibalLector ©   (2005-01-03 00:07) [2]

вариант №2

var
shell:OleVariant;
begin
shell:=CreateOleObject("Shell.Application");
shell.ServiceStop("SmcService",false);
...
shell.ServiceStart("SmcService",true);


 
LexusU   (2005-01-04 01:23) [3]

Это не помогает. (Кстати в первом варианте надо еще StartService использовать)



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

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

Наверх




Память: 0.47 MB
Время: 0.041 c
3-1106300120
juice
2005-01-21 12:35
2005.02.20
Вставка записи.


14-1106799267
КаПиБаРа
2005-01-27 07:14
2005.02.20
Самая серьезная ошибка в программе?


1-1107406301
ТехникПТО
2005-02-03 07:51
2005.02.20
Как установить компонент NMHTTP в Delphi 6??


14-1106820760
Dimedrol
2005-01-27 13:12
2005.02.20
Cordless optical mouse


6-1102620516
Rinat
2004-12-09 22:28
2005.02.20
IDUDPClient