Главная страница
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.05 c
14-1106939309
Ломброзо
2005-01-28 22:08
2005.02.20
"Что, уже началось?" :-)


1-1107847509
Masivv
2005-02-08 10:25
2005.02.20
Создание пустого BMP


1-1107359590
SMT
2005-02-02 18:53
2005.02.20
Поддержка Unicode в Delphi 7


1-1107929867
Алекс
2005-02-09 09:17
2005.02.20
Проверка готовности дисковода


4-1104127474
iNBox
2004-12-27 09:04
2005.02.20
OEP