Forum Kurallarımız güncellenmiştir. DelphiCan Forum Kuralları (March 04) x

Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
JSON Bilgi Talebi, RAD 10 Seattle Yeni JSON Özellikleri Hakkında
#1
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"
    }
  ]
}
Cevapla
#2
Merhaba,
JSON yapısı çok da karmaşık görünmüyor.
Vermiş olduğunuz linklerde örnekler var. Bu örneklerden yola çıkarak yapabilirsiniz.
While true do; Hayat döngüsü, kısır değildir! Yapılan bir yanlış, o döngünün dışına çıkmanızı sağlayacaktır.
WWW
Cevapla
#3
Burada ilk mesajda verilen makaleler , bu jsonu pars edebilmek için fazlasıyla yeterli.

http://www.delphican.com/json-parse.html...9#pid20909
WWW
Cevapla
#4
(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.
Cevapla
#5
(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"
   }
 ]
}
Cevapla


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  JSON UTF8 Sorunu pro_imaj 0 163 05-05-2020, Saat: 00:26
Son Yorum: pro_imaj
  Memo bileşeni Duplicate veya Put hakkında yardım kofmaster 6 445 11-04-2020, Saat: 22:39
Son Yorum: kofmaster
  IDE hakkında sorular(F8 Debug,Otomatik tamamlama) 41linea41 6 556 10-03-2020, Saat: 20:07
Son Yorum: kodamelesi
  IHTMLSelectElement onChange olayı hakkında [ÇÖZÜLDÜ] kodamelesi 6 816 03-03-2020, Saat: 16:45
Son Yorum: kodamelesi
  Streaming hakkında Kerembacioglu 0 203 29-02-2020, Saat: 19:50
Son Yorum: Kerembacioglu



Konuyu Okuyanlar: 1 Ziyaretçi