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

Вниз

Реестр   Найти похожие ветки 

 
bloodman ©   (2003-07-10 23:14) [0]

Здавствуйте мастера.Мне нужно считать(а потом записать) числовое значение в реестр. Пробую так:
var
Reg :HKEY;
Wind : Integer;
....
RegCreateKey(HKEY_CLASSES_ROOT,
"CLSID\{05300003-0045-0038-0604-000006004002}\InProcServer32", Reg);
RegQueryValueEX(Reg,"data",nil,REG_SZ,@Wind,4);
Но выдается ошибка. Что не так?


 
Cobalt ©   (2003-07-11 01:18) [1]

И что за ошибку выдаёт?
Из по какого пользователя запускаешьпрограмму? (user/power user/admin)


 
Lord Warlock ©   (2003-07-11 10:02) [2]

var
Reg :HKEY;
Wind : Integer;
typ,sz: DWord;

....
RegCreateKey(HKEY_CLASSES_ROOT,
"CLSID\{05300003-0045-0038-0604-000006004002}\InProcServer32", Reg);
typ:=REG_SZ;
sz:=Sizeof(Wind);
RegQueryValueEX(Reg,"data",nil,@Typ,@Wind,@sz);


 
Lord Warlock ©   (2003-07-11 10:16) [3]

и еще:
1. Надо делать OpenKey. Если этого параметра нет, CreateKey создаст его, но запрашиваемого тобой значения data там не будет
2 посоветовал бы делать так:
if RegOpenKey(HKEY_CURRENT_USER,"...",Key)=ERROR_SUCCESS then
if RegQueryValueEx(Key,ну и прочее...)=ERROR_SUCCESS then
.....
else
ShowMessage(SysErrorMessage(GetLastError)
else
ShowMessage(SysErrorMessage(GetLastError)



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

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

Наверх




Память: 0.47 MB
Время: 0.017 c
1-77838
Navi
2003-07-06 13:49
2003.07.24
TUpDown in TStringGrid


3-77797
Sliften
2003-06-29 20:38
2003.07.24
Как програмно добавить поле


1-77988
Вован
2003-07-10 18:13
2003.07.24
Объясните пожалуйста что, возвращает GetDC(0)


14-78106
Shiza
2003-07-08 11:19
2003.07.24
Как работать с MSDN


14-78070
Lenza
2003-07-07 12:39
2003.07.24
Watches