使用 Inno Setup Pascal 脚本将二进制数据写入注册表

Question

我再次需要你的帮助。我想用十六进制条目写入注册表。我们应该怎么做？我需要 [Code] 部分下的功能。

我就是这样做的：

procedure ADDRegistry;
begin
  RegWriteDWordValue(HKLM64,'SYSTEM\CurrentControlSet\services\FIDTPU\Parameters', 'CalibMode', 0);

  RegWriteBinaryValue(HKLM64,'SYSTEM\CurrentControlSet\services\FIDTPU\Parameters', 'Caldata9' + 
    #7c#17#17#01#26#08#1f#0f#50#02#cf#08#40#0f#f7#13#f6#01#26#1f#f7#01#6b#27#e7#1d#81#15#54#00#27#df#2d#06#dd#2b#e2#1d#61#17#56#00#18#9f#af#01#df#2b#bd#1d#49#19#b3#01#0d#bf#3b#03#87#2d#c6#1d#c9#10#cc#03#19#7f#7d#01#d9#2d#ae#1d#f9#13#54#00#34#5f#03#02#6b#2e#aa#1d#6f#14#54#00#30#9f#55#00#6b#2e#9c#1d#65#17#e5#02#34#df#b3#01#e9#2f#99#1d);
end;

RegWriteDWordValue 有效，但 RegWriteBinaryValue 无效。

带十六进制的原始注册表项是：

"Caldata9"=hex:7c,17,17,01,26,08,1f,0f,50,02,cf,08,40,0f,f7,13,f6,01,26,1f,f7,
01,6b,27,e7,1d,81,15,54,00,27,df,2d,06,dd,2b,e2,1d,61,17,56,00,18,9f,af,01,
df,2b,bd,1d,49,19,b3,01,0d,bf,3b,03,87,2d,c6,1d,c9,10,cc,03,19,7f,7d,01,d9,
2d,ae,1d,f9,13,54,00,34,5f,03,02,6b,2e,aa,1d,6f,14,54,00,30,9f,55,00,6b,2e,
9c,1d,65,17,e5,02,34,df,b3,01,e9,2f,99,1d

我该怎么做？

非常感谢您的帮助。

Answer 1

在 #dd 的 Pascal 中，dd 是字符的 十进制 表示，而不是 十六进制 .所以 #7c 不是你想的那样，它甚至不会编译。

要使用 十六进制 表示，请使用 #$hh。

另请注意，'Caldata9' 后应有一个逗号，而不是加号。

RegWriteBinaryValue(
    HKLM64, 'SYSTEM\CurrentControlSet\services\FIDTPU\Parameters', 'Caldata9',
    #c###...);

使用 Inno Setup Pascal 脚本将二进制数据写入注册表

Writing binary data to registry using Inno Setup Pascal Scripting

registry

inno-setup

pascalscript