ReadIntegerDef(ValueName: String; DefaultValue: Integer): Integer;
ValueName - наименование параметра, значение которого необходимо получить.
DefaultValue - значение, которое будет подставляться, если параметр не существует.
Метод ReadIntegerDef осуществляет считывание целочисленного значения из DWORD параметра в реестре. Если параметр с наименованием ValueName не существует - метод возвращает DefaultValue.
Sub Main;
Var
RegKey, SubKey: IRegistryKey;
i: Integer;
Begin
RegKey := RegistryClass.CurrentUser;
SubKey := RegKey.OpenSubKey("Software\MyProject\Params", False);
i := SubKey.ReadIntegerDef("Param1", 13);
End Sub Main;
После выполнения примера, из параметра с наименованием "Param1", расположенного в подразделе реестра "HKEY_CURRENT_USER\Software\MyProject\Params", в переменную "i" будет считано целочисленное значение. Если параметр не существует - в переменной "i" будет содержаться значение "13".
См.также: