delphiXE TJSONPair 键和值
时间: 2024-04-14 11:23:30 浏览: 29
DelphiXE中的TJSONPair是用于表示JSON对象中的键值对的类。它是TJSONObject类的成员之一,用于存储JSON对象中的每个键值对。
TJSONPair类有两个重要的属性:
1. JsonString:表示键的字符串值。
2. JsonValue:表示值的JSON数据类型。
使用TJSONPair,您可以方便地访问和操作JSON对象中的键和值。以下是一个示例:
```delphi
var
JSONObject: TJSONObject;
JSONPair: TJSONPair;
Key: string;
Value: TJSONValue;
begin
// 创建一个JSON对象
JSONObject := TJSONObject.Create;
// 添加键值对到JSON对象
JSONObject.AddPair('name', 'John');
JSONObject.AddPair('age', TJSONNumber.Create(25));
// 遍历JSON对象中的键值对
for JSONPair in JSONObject do
begin
Key := JSONPair.JsonString.Value; // 获取键的字符串值
Value := JSONPair.JsonValue; // 获取值
// 打印键和值
Writeln('Key: ' + Key);
Writeln('Value: ' + Value.ToString);
end;
// 释放JSON对象
JSONObject.Free;
end;
```
上述示例中,我们创建了一个JSON对象,并向其添加了两个键值对。然后,我们使用TJSONPair类遍历JSON对象中的键值对,并打印出每个键和值。
相关推荐
![rar](https://img-home.csdnimg.cn/images/20210720083606.png)
![zip](https://img-home.csdnimg.cn/images/20210720083736.png)
![zip](https://img-home.csdnimg.cn/images/20210720083736.png)
![zip](https://img-home.csdnimg.cn/images/20210720083736.png)
![zip](https://img-home.csdnimg.cn/images/20210720083736.png)
![rar](https://img-home.csdnimg.cn/images/20210720083606.png)
![zip](https://img-home.csdnimg.cn/images/20210720083736.png)
![7z](https://img-home.csdnimg.cn/images/20210720083312.png)
![zip](https://img-home.csdnimg.cn/images/20210720083736.png)
![zip](https://img-home.csdnimg.cn/images/20210720083736.png)