function RegWriteStringValue(const RootKey: Integer; const SubKeyName, ValueName, Data: String): Boolean;
Записывает в реестр указанное значение с типом REG_SZ. В случае успеха функция возвращает значение True, иначе — False.
Если значение уже существует и имеет тип REG_EXPAND_SZ, новое значение также будет иметь тип REG_EXPAND_SZ. В противном случае будет создано значение с типом REG_SZ.
begin RegWriteStringValue(HKEY_AUTO, 'Software\My Company\My Program', 'Language', ExpandConstant('{language}')); end;