如何仅从本地 JSON 文件中提取特定值?

How to extract only a specific value from a local JSON file?

我有一个文件 info.json,其中仅包含以下代码:

{"personal": {"path": "C:\My Directory", "honk": 82641923}}

在 Delphi XE7 中,如何提取路径值,即 'C:\My Directory'?

对于 MongoDB connector I made,我需要一个轻量级 JSON(实际上是 BSON)对象,并选择将其基于 OleVariant 变量。使用 bsonUtils.pas 中的 JsonToBson(和 bsonDoc.pas 中的 IBSONDocument)你可以写:

(IUnkown(JsonToBson('{"personal": {"path": "C:\My Directory", "honk": 82641923}}')['personal']) as IBSONDocument)['path']