WriteInteger(ValueName: String; Value: Integer);
ValueName. Наименование параметра, значение которого необходимо изменить;
Value. Значение, которое необходимо установить для параметра в реестре.
Метод WriteInteger осуществляет изменение значения параметра, содержащего целые числа.
Если параметр, либо подраздел не существуют, то они создаются автоматически. Если параметр существует - тип и значение будут изменены в соответствии с заносимыми данными.
Если необходимо изменить значение параметра по умолчанию - необходимо в качестве наименования передать пустую строку ("").
Для выполнения примера в реестре предполагается наличие параметра с наименованием 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.WriteInteger("Param1", 100);
End Sub UserProc;
В результате выполнения примера, для параметра с наименованием Param1;, расположенном в подразделе [HKEY_CURRENT_USER\Software\MyProject\Params], будет установлено целочисленное значение 100.
См.также: