怎么将 值'hex:26,57,c8,b3,fb,bb,c5,01' 写入注册表里面，类型为 REG_BINARY

如何将 值'hex:26,57,c8,b3,fb,bb,c5,01' 写入注册表里面，类型为 REG_BINARY
如何将 值'hex:26,57,c8,b3,fb,bb,c5,01' 写入注册表里面，类型为 REG_BINARY
[解决办法]

uses
  Registry;

procedure TForm1.Button1Click(Sender: TObject);
var
  i, len: integer;
  Buf: array of byte;
  R: TRegistry;
begin
  //26,57,c8,b3,fb,bb,c5,01
  SetLength(Buf, 8);
  fillchar(Buf[0],Length(buf),0);
  Buf[0] := $26;
  Buf[1] := $57;
  Buf[2] := $c8;
  Buf[3] := $b3;
  Buf[4] := $fb;
  Buf[5] := $bb;
  Buf[6] := $c5;
  Buf[7] := $01;
  R:=TRegistry.Create;
  try
    R.RootKey := HKEY_CURRENT_USER;
    if R.OpenKey('Software\test',True) then
      try
        R.WriteBinaryData('mydata',Buf[0],Length(Buf));
      finally
        R.CloseKey;
      end;
  finally
    R.Free;
  end;
end;