Главная страница
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.023 c
1-1107707185
Mr-JAck
2005-02-06 19:26
2005.02.20
перевод градусов от одного вида к другому.


6-1102401635
Pretender
2004-12-07 09:40
2005.02.20
У становка Indy 9 на Delphi 6


3-1106245115
Alexandr--
2005-01-20 21:18
2005.02.20
VarbinaryToVarchar ?


14-1107257540
Kerk
2005-02-01 14:32
2005.02.20
Нужна...


6-1102353214
Zahar
2004-12-06 20:13
2005.02.20
Как узнать адрес DNS-сервера???