读书人

怎么将 值amp;#x27;hex:26,57,c8,b3,fb,b

发布时间: 2013-02-25 10:23:36 作者: rapoo

如何将 值'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;

读书人网 >.NET

热点推荐