[xrpcompany]

Как записать в реестр WORD значение без TRegistry. Я нашел запись строкового, но мне нужно dword?
строковое:

Код:

function RegWriteStr(RootKey: HKEY; Key, Name, Value: string): Boolean;
var
  Handle: HKEY;
  Res: LongInt;
begin
  Result := False;
  Res := RegCreateKeyEx(RootKey, PChar(Key), 0, nil, REG_OPTION_NON_VOLATILE,
    KEY_ALL_ACCESS, nil, Handle, nil);
  if Res <> ERROR_SUCCESS then
    Exit;
  Res := RegSetValueEx(Handle, PChar(Name), 0, REG_SZ, PChar(Value),
    Length(Value) + 1);
  Result := Res = ERROR_SUCCESS;
  RegCloseKey(Handle);
end;

Админ: Пользуемся тегами для оформления кода!

[Человек_Борща]

Мне кажется надо использовать REG_DWORD всесто REG_SZ

[xrpcompany]

Я пробывал в место REG_SZ вставить REG_DWORD , но выдает ошибку

[M.A.D.M.A.N.]

Код:

RegSetValueEx(Handle, PChar(Name), 0, REG_DWORD, @variable, 4);

[xrpcompany]

@variable какое значение должно быть

[xrpcompany]

Спасибо получилось!

[angvelem]

Сообщение от M.A.D.M.A.N.

Код:

RegSetValueEx(Handle, PChar(Name), 0, REG_DWORD, @variable, 4);

Читаем внимательно, variable переменная типа DWORD, со значением 1.

[Ralik]

Я внимательно прочитал. У меня не получается. Ну тупой я и что?
RegSetValueEx(HKEY_CURRENT_USER, PChar(Name), 0, REG_DWORD, @1, 4)
Что здесь не правильно и куда вписывать нужный ключ?