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