Skip to content

Commit faa5bd6

Browse files
committed
shortcuts: JSON(enumerator),JSONEnum(enumerator)
1 parent c8b2759 commit faa5bd6

File tree

1 file changed

+12
-0
lines changed

1 file changed

+12
-0
lines changed

jsonDoc.pas

+12
Original file line numberDiff line numberDiff line change
@@ -130,6 +130,8 @@ function JSON(x: OleVariant): IJSONDocument; overload;
130130
}
131131
function JSONEnum(x: IJSONDocument): IJSONEnumerator; overload; //inline;
132132
function JSONEnum(x: OleVariant): IJSONEnumerator; overload;
133+
function JSON(x: IJSONEnumerator): IJSONDocument; overload; //inline;
134+
function JSONEnum(x: IJSONEnumerator): IJSONEnumerator; overload; //inline;
133135

134136
implementation
135137

@@ -1025,6 +1027,16 @@ function JSONEnum(x: OleVariant): IJSONEnumerator;
10251027
Result:=(IUnknown(x) as IJSONEnumerable).NewEnumerator;
10261028
end;
10271029

1030+
function JSON(x: IJSONEnumerator): IJSONDocument;
1031+
begin
1032+
Result:=IUnknown(x.Value) as IJSONDocument;
1033+
end;
1034+
1035+
function JSONEnum(x: IJSONEnumerator): IJSONEnumerator;
1036+
begin
1037+
Result:=(IUnknown(x.Value) as IJSONEnumerable).NewEnumerator;
1038+
end;
1039+
10281040
{ TJSONEnumerator }
10291041

10301042
constructor TJSONEnumerator.Create(Data: TJSONDocument);

0 commit comments

Comments
 (0)