Главная страница
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.054 c
3-1155227101
Serg1981
2006-08-10 20:25
2006.10.08
Резервное копирование БД


15-1158669123
vidiv
2006-09-19 16:32
2006.10.08
Снятие пароля на setup для ноутбука.


15-1158656524
слов нет..
2006-09-19 13:02
2006.10.08
верстка


15-1158235085
Чапаев
2006-09-14 15:58
2006.10.08
Delphi 2006 ETM. Что-то туплю.


5-1140528799
SMAC
2006-02-21 16:33
2006.10.08
Добавление компонент