Как реализовать запись hex в реестр?

[Ant1Player]

Как реализовать запись hex в реестр?
желательно на этом примере:
нужно в SmoothMouseXCurve записать hex:00,00,00,00,00,00,00,00,00 ,a0,00,00,00,00,00,00,00,40,\
01,00,00,00,00,00,00,80,02,00,00,00 ,00,00,00,00,05 ,00,00,00,00,00

[Stilet]

TRegistry.WriteBinaryData по-моему поможет.

[Ant1Player]

а можно на примере?

[Kotofff]

Вот пример на скорую руку из Букваря:

var
  Reg: TRegistry;
  buf : array [0..4] of byte;
  i: Integer;
begin
  Reg := TRegistry.Create;
  try
    Reg.RootKey := HKEY_CURRENT_USER;
    if Reg.OpenKey('\Software', True) then begin
      for i:=1 to 4 do buf[i]:=0;
      buf[0]:=1;
      Reg.WriteBinnaryData('Value', buf, sizeof(buf));
      Reg.CloseKey;
    end;
  finally
    Reg.Free;
    inherited;
  end;
end;

[Ant1Player]

прост я делфи ток учу, куда именно вписывать
00,00,00,00,00,00,00,00,00 ,a0,00,00,00,00,00,00,00,40,\
01,00,00,00,00,00,00,80,02,00,00,00 ,00,00,00,00,05 ,00,00,00,00,00
?

[mihali4]

Скажите, а сразу тему нельзя было назвать по-человечески?
Где суть задаваемого вопроса в названии "Реестр HEX"?
Или вы, как и многие, манкируете правилами раздела?
А зря... Модераторы всерьез взялись за воспитание культуры общения.

[XuTpbIu]

запись 16ричного значени идёт как $XX, где ХХ - произвольные цифры
а то что всё это записано - видимо отдельные байты буфера buf(если смотреть пример Kotofff)
ну и ещё надо поменять:

var
  Reg: TRegistry;
  buf : array [0..4] of byte;
  i: Integer;
begin
  Reg := TRegistry.Create;
  try
    Reg.RootKey := HKEY_CURRENT_USER;
    if Reg.OpenKey('\Control Panel\Mouse', True) then begin
      {тут как раз заполняем буфер значениями}
    end;
  finally
    Reg.Free;
  end;
end;

Единственное я не понимаю что такое "\" в значении.

[Ant1Player]

сам не понимаю, написано так в reg файле

[HKEY_CURRENT_USER\Control Panel\Mouse]
"SmoothMouseXCurve"=hex:00,00,00,00,00,00,00,00,00 ,a0,00,00,00,00,00,00,00,40,\
01,00,00,00,00,00,00,80,02,00,00,00,00,00,00,00,05 ,00,00,00,00,00

[XuTpbIu]

Открыл реестр. Никаких слэшей не нашёл.
просто пиши подряд все значения в буфер. и пиши собсно сам буфер в реестр.

[Ant1Player]

так?

   var
  Reg: TRegistry;
  buf : array [0..4] of byte;
  i: Integer;
begin
  Reg := TRegistry.Create;
  try
    Reg.RootKey := HKEY_CURRENT_USER;
    if Reg.OpenKey('\Control Panel\Mouse', True) then begin
      {тут как раз заполняем буфер значениями}
      '00,00,00,00,00,00,00,00,00,a0,00,00,00,00,00,00,00,40,01,00,00,00,00,00,00,80,02,00,00,00,00,00,00,00,05 ,00,00,00,00,00'

    end;
  finally
    Reg.Free;
  end;
end;

end.

и как потом их записывать?


Чет для первой програмки думаю зря взял реестр, но доделать надо =) обычные и dword значения разобрался как вписывать читать и тд а с hex проблеммы вышли...
Но доделать надо, весьма полезная вещь для людей кто играет в cs 1.6 +)