Форум: "Основная";
Текущий архив: 2002.07.22;
Скачать: [xml.tar.bz2];
Вниз
Реестр. Как избежать ошибки? Найти похожие ветки
← →
iii (2002-07-10 15:20) [0]Здравствуйте.
У меня при загрузке программы читаються некоторые значения из реестра. Если значение не соответствует нужному, выводится ошибка - 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;
← →
Skier (2002-07-10 15:30) [1]>iii
А если всё это в try-блок засунуть ?
← →
Skier (2002-07-10 15:43) [2]>iii
function TRegistry.GetDataInfo не устроит ???
← →
iii (2002-07-10 17:56) [3]
> А если всё это в try-блок засунуть ?
Безполезно, пробовал!
← →
Skier (2002-07-10 18:02) [4]>iii
см. Skier © (10.07.02 15:43)
← →
Skywalker (2002-07-10 19:55) [5]try должен проходить
в такой форме
try
...
except
on ERegistryException do
begin
end
end
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.07.22;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.004 c
