| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Реестр. Как избежать ошибки?

iii ©   (2002-07-10 15:20:00) 

Здравствуйте.
У меня при загрузке программы читаються некоторые значения из реестра. Если значение не соответствует нужному, выводится ошибка - Invalid data type for "NoDriveTypeAutoRun". Это возникает, например, если значение должно быть двоичным, а на его месте такой же параметр, но со строковым значением. Помогите избежать ошибки!

//Чтение
procedure ReadData;
var
buf:Dword;
Reg:TRegistry;
begin
Reg:=TRegistry.Create;
Reg.RootKey:=HKEY_CURRENT_USER;
Reg.OpenKey("SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer",False);

if Reg.ValueExists("NoDriveTypeAutoRun") then
begin
Reg.ReadBinaryData("NoDriveTypeAutoRun",buf,sizeof(buf));
if buf=0 then
Form1.Checkbox11.Checked:=true
else
Form1.Checkbox11.Checked:=false;
end;

Reg.CloseKey;
Reg.Free;
end;

---

Skywalker   (2002-07-10 19:55:00) [1]

try должен проходить
в такой форме
try
...
except
on ERegistryException do
begin
end
end

---

Skier   (2002-07-10 18:02:00) [2]

>iii
см. Skier © (10.07.02 15:43)

---

iii   (2002-07-10 17:56:00) [3]

> А если всё это в try-блок засунуть ?


Безполезно, пробовал!

---

Skier   (2002-07-10 15:43:00) [4]

>iii

function TRegistry.GetDataInfo не устроит ???

---

Skier   (2002-07-10 15:30:00) [5]

>iii
А если всё это в try-блок засунуть ?

---

Наверх