Показать сообщение отдельно
  #5  
Старый 08.09.2010, 16:05
Аватар для Yurk@
Yurk@ Yurk@ вне форума
Специалист
 
Регистрация: 07.09.2007
Адрес: Украина, г. Днепропетровск
Сообщения: 892
Версия Delphi: 7 + ОгнеПтица
Репутация: выкл
По умолчанию

Rat, при чтении строкового параметра ошибки и не будет т.к. значение отсутствие значения это уже есть какая-то строка, а для числа это недопустимое значение, вот он и ругается.
Я делал так:
Код:
function IntKeyIsPresent(rKey:HKEY; Path, Name:string; var KeyValue:integer):boolean;
begin
Result:=False;
  try
    R:=TRegistry.Create;
    R.RootKey:=rKey;
    R.OpenKey(Path,True);
    if R.KeyExists(Name)=True
      then
      begin
      KeyValue:=R.ReadInteger(Name);
      Result:=True;
      end
      else KeyValue:=0;
    R.CloseKey;
  Except R.Free;
  end;
end;
__________________
Поживу - увижу, Доживу - узнаю, Выживу - учту.
[P.S.]->Выражая благодарность за помощь - Вы получаете шанс на помощь в следующий раз
Ответить с цитированием