JSON Bilgi Talebi, RAD 10 Seattle Yeni JSON Özellikleri Hakkında

[eroniko]

Merhabalar. 
Uzun süredir delphi ile uğraşmıyordum. fakat bir arkadaşın talebi üzerine uğraşmam gerekiyor. 
Aşağıdaki JSON formatında elimde 60 megabaytlık  json dosya var. dosyaların array değerlerini aldırabiliyorum. alttaki adi soyadı değerlerini  okumama da gerek yok. Fakat array değerlerini aldırırken delphinin eski fameworkunu kullanıyorum. programı nosql yaptım.
Forumda arama yaptım fakat yeniframework e ilişkin bilgi bulamadım. 

Eski ve yeni json frameworklere ilişkin  bilgi linkleri
1- http://docwiki.embarcadero.com/RADStudio/Tokyo/en/JSON
2- https://www.youtube.com/watch?v=onX1MoE3mUM

Araştırmalarım neticesinde yeni frameworklerin daha hızlı ve kullanışlı olduğunu okudum. 
Yeni frameworklere ilişkin örnek çalışma:
1- http://docwiki.embarcadero.com/Libraries...Enumerator
2-https://plus.google.com/109731372848558250187/posts/3X2MSZFDrPS
3- https://stackoverflow.com/questions/5132...eader?rq=1

Yardımlarınızı beklediğim konu. 
aşağıdaki formatta  json dosyasının sadece array değerlerini yeni yöntemlerle okuyarak bir listeye eklemek istiyorum. (altta bulunan adı soyadı değerlerini okumama gerek yok). 

bu hususta bana yardımcı olabilir misiniz? 


{

  "825967fee28288bd590c80a6595f1812": [                //array
    {
      "adi": "ugur",
      "soyadi": "soylu"
    }
  ],
  "f7f50726c51fad350f9093c450ce8773": [
     {
      "adi": "hasan",
      "soyadi": "soylu"
    }
  ],
  "6c8c79307ab63b8168858ebaa2c06b79": [
    {
      "adi": "onur",
      "soyadi": "soylu"
    }
  ]
}

[TescilsizUzman]

Merhaba,
JSON yapısı çok da karmaşık görünmüyor.
Vermiş olduğunuz linklerde örnekler var. Bu örneklerden yola çıkarak yapabilirsiniz.

[yhackup]

Burada ilk mesajda verilen makaleler , bu jsonu pars edebilmek için fazlasıyla yeterli.

http://www.delphican.com/json-parse.html...9#pid20909

[eroniko]

(13-10-2018, Saat: 16:55)yhackup Adlı Kullanıcıdan Alıntı: Burada ilk mesajda verilen makaleler , bu jsonu pars edebilmek için fazlasıyla yeterli.

http://www.delphican.com/json-parse.html...9#pid20909

belirtiğiniz konuları incelemiştim. bu yöntemler ile alıyorum. Teşekkürler hocam. Yeni framework ile almaya çalışacam.

[eroniko]

(13-10-2018, Saat: 14:37)Fesih ARSLAN Adlı Kullanıcıdan Alıntı: Merhaba,
JSON yapısı çok da karmaşık görünmüyor.
Vermiş olduğunuz linklerde örnekler var. Bu örneklerden yola çıkarak yapabilirsiniz.

Hocam dediğiniz şekilde araştırdım. yeni frameworkler cok daha hızlı.  array tarama işlemim 3 kat daha hızlandı.  Performans açısından mükemmel oldu.
diğer arkadaşlara da yardımcı olması için kodları ve açıklamaları aşağı ekledim.
Teşekkürler.

procedure TForm1.Button17Click(Sender: TObject);
var
 LIterator: TJSONIterator;
 LJsonTextReader: TJsonTextReader;
 streamreader: TStreamReader;
begin
streamreader := TStreamReader.Create('C:\sa.json', TEncoding.Default);  //TEncoding.UTF8 yapınca türkçe karakterleri alıgılamadığı için default yaptım
LJsonTextReader := TJsonTextReader.Create(streamreader);
LIterator := TJSONIterator.Create(LJsonTextReader);
  while LIterator.Next do
  Memo2.Lines.Add(LIterator.Key);
//böylelikle direk array değerleri memory e aktakrdım. 
end;

sa.json dosyası

{

"825967fee28288bd590c80a6595f1812": [                //array
   {
     "adi": "ugur",
     "soyadi": "soylu"
   }
 ],
"f7f50726c51fad350f9093c450ce8773": [
    {
     "adi": "hasan",
     "soyadi": "soylu"
   }
 ],
"6c8c79307ab63b8168858ebaa2c06b79": [
   {
     "adi": "onur",
     "soyadi": "soylu"
   }
 ]
}