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

Вниз

Ни-ти-вонипонимаю :-((   Найти похожие ветки 

 
DillerXX ©   (2006-09-16 23:10) [0]

Код1:

uses
 Windows;
var
 Value: DWORD;

var
 Key: hKey;
 ddSize: DWORD;
begin
 RegOpenKey(HKEY_LOCAL_MACHINE, "SYSTEM\Select", Key);
 RegQueryValueEx(Key, "Current", nil, nil, @Value, @ddSize);
end.


В Д7 и под ХР он НЕ работает, в Value лежит 0. Следующий код
Код2:

uses
 Windows;
var
 Value: DWORD;

procedure Proc;
var
 Key: hKey;
 ddSize: DWORD;
begin
 RegOpenKey(HKEY_LOCAL_MACHINE, "SYSTEM\Select", Key);
 RegQueryValueEx(Key, "Current", nil, nil, @Value, @ddSize);
end;

begin
 Proc;
end.

И он РАБОТАЕТ, Value = 3.
Вопрос: и ..... ???


 
guav ©   (2006-09-16 23:17) [1]

смотри справку по RegQueryValueEx. Инициализируй ddSize


 
Чапаев ©   (2006-09-16 23:19) [2]

> В Д7 и под ХР он НЕ работает, в Value лежит 0.

Мессир, я в панике! Почему у меня под ХР после выполнения первой строки кода в Key лежит 4052?


 
Чапаев ©   (2006-09-16 23:19) [3]

То есть пардон, кое-кому пора спать.


 
DillerXX ©   (2006-09-17 11:16) [4]

Понял, разобрался, всем спасибо :) ДА действительно, мне спать лечь пора было... не подумал про не-инициализацию переменных в процедурах.


 
Чапаев ©   (2006-09-17 11:30) [5]

> ДА действительно, мне спать лечь пора было...

Неправда, спать пора было мне.


 
DillerXX ©   (2006-09-17 14:52) [6]


> Неправда, спать пора было мне

Вы ошибаетесь! Мне тоже пора было...


 
Колдун ©   (2006-09-17 16:28) [7]

ффсем спать - ссут, идёт



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

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

Наверх




Память: 0.48 MB
Время: 0.032 c
15-1158582444
Konstantin555
2006-09-18 16:27
2006.10.08
C помощью какой программы можно скрыть повреждённые сектора?


2-1158511777
POP
2006-09-17 20:49
2006.10.08
Асинхронное IO чтение/запись в порт.


15-1158361464
Doblclick
2006-09-16 03:04
2006.10.08
Nokia 6610 i


2-1158689056
KEBZ
2006-09-19 22:04
2006.10.08
ListBox


15-1158487787
ArtemESC
2006-09-17 14:09
2006.10.08
Полином