WriteBoolean(ValueName: String; Value: Boolean);
ValueName. Наименование параметра, значение которого необходимо изменить;
Value. Значение, которое необходимо установить для параметра в реестре.
Метод WriteBoolean осуществляет изменение значения логического параметра.
Если параметр, либо подраздел не существуют, то они создаются автоматически. Если параметр существует - тип и значение будут изменены в соответствии с заносимыми данными.
Если необходимо изменить значение параметра по умолчанию - необходимо в качестве наименования передать пустую строку ("").
Для выполнения примера в реестре предполагается наличие параметра с наименованием Param1, расположенного в подразделе [HKEY_CURRENT_USER\Software\MyProject\Params].
Добавьте ссылку на системную сборку Registry.
Sub UserProc;
Var
RegKey, SubKey: IRegistryKey;
Begin
// Получим подраздел с настройками пользователя
RegKey := RegistryClass.CurrentUser;
SubKey := RegKey.OpenSubKey("Software\MyProject\Params", True);
// Установим логическое значение параметра
SubKey.WriteBoolean("Param1", True);
End Sub UserProc;
В результате выполнения примера, для параметра с наименованием Param1, расположенного в подразделе [HKEY_CURRENT_USER\Software\MyProject\Params], будет установлено логическое значение True.
См.также: