wordpress   发布时间:2022-04-02  发布网站:大佬教程  code.js-code.com
大佬教程收集整理的这篇文章主要介绍了windows – 读取存储在注册表中的GUID值大佬教程大佬觉得挺不错的,现在分享给大家,也给大家做个参考。

概述

我尝试在Delphi中读取存储为二进制值的GUID值. 当我用BintoHex读取它时,结果是相反的顺序. 似乎我必须交换字节,但我认为BinToHex会这样做. 我参了这个帖子,但我找不到合适的解决方案: how to convert byte array to its hex representation in Delphi 这似乎是由于很少的Eendian. 在下面,您可以看到存储在注册表
我尝试在Delphi中读取存储为二进制值的GUID值.
当我用BintoHex读取它时,结果是相反的顺序.
似乎我必须交换字节,但我认为BinToHex会这样做.

我参了这个帖子,但我找不到合适的解决方案:
how to convert byte array to its hex representation in Delphi
这似乎是由于很少的Eendian.

在下面,您可以看到存储在注册表中的GUID

这是我的代码

var
s : String;
buffer : pointer;
...

begin
getmem(buffer,1024*1024);
....
reg.ReadBinaryData(iValueOfregistry,buffer^,1024*1024);
....
bintohex(pointer(longint(buffer)+14),PChar(s),32);

输出为s:
90E24D373F126545916439C4925E467B

GUID应为FOLDERID_Downloads GUID:
{374DE290-123F-4565-9164-39C4925E467B}

请帮忙

解决方法

二进制形式的GUID最好被视为记录.确实在Delphi中,记录已经存在 – 它是 TGUID.

您需要做的就是将相关字节直接复制到TGUID类型的变量中,并完成您的工作.如果需要字符串表示,请使用GUIDToString.

var
  GUID: TGUID;
  strGUID: String;
....
GUID := PGUID(PAnsiChar(buffer)+14)^;
strGUID := GUIDToString(GUID);

这将自动处理所有endian问题.我们来看看TGUID的声明:

TGUID = packed record
  D1: LongWord;
  D2: Word;
  D3: Word;
  D4: arraY[0..7] of Byte;
end;

您的代码将此视为一个直接的字节数组.但是,在记录中,D1,D2和D3是小端机器上的整数类型.因此,您的代码会反转前4个字节,即属于D1的字节.然后它反转D2的两个字节,以及D3的两个字节.当然,GUID末尾的8个字节的数组不会反转.

因此,然您可以轻松地自己完成所有字节交换,但使用记录更好,并利用将二进制GUID记录转换为格式正确的GUID字符串的辅助函数.

大佬总结

以上是大佬教程为你收集整理的windows – 读取存储在注册表中的GUID值全部内容,希望文章能够帮你解决windows – 读取存储在注册表中的GUID值所遇到的程序开发问题。

如果觉得大佬教程网站内容还不错,欢迎将大佬教程推荐给程序员好友。

本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。