Hast du mal testhabler eine Stringlist übergeben?
Delphi-Quellcode:
procedure ExtractElements(AElementName: string; AElement: TlkJSONbase;
ElementList: TStringList; var Continue: Boolean);
begin
ElementList.Add(..);
end;
(AJSON.Field['su'] as TlkJSONlist).ForEach(@ExtractElements, MyElementList);