Jsondan rastgele veri çekme


   var
mainform : tclform;


void jsonV
var
words, word:String;

i: Integer;

 {
  words=clomosy.getunittext('categorywords');
  word= Clomosy.CLParseJSON(words, 'categories.'+IntToStr(i)+'.pairs.0.0');
  ShowMessage(word);
}


{
  mainform = TclForm.Create(Self);
  mainform.run;
  jsonV;
  
}  
------------------------------------------------------
 Clomosynin textindeki Json yapısından veri çekiyorum ama bunu rastgele yapmam gerek bunu nasıl yapabilirim 

-----------Kullandığım JSON------------


{
  "categories": [
    {
      "id": 1,
      "name": "Futbolcular",
      "pairs": [
        ["Cristiano Ronaldo", "Lionel Messi"],
        ["Frank Lampard", "Steven Gerrard"],
        ["Wayne Rooney", "Robin van Persie"],
        ["Sergio Ramos", "Gerard Piqué"],
        ["Mesut Özil", "İlkay Gündoğan"],
        ["Arda Turan", "Emre Belözoğlu"],
        ["Roberto Carlos", "Marcelo"],
        ["Erling Haaland", "Kylian Mbappé"],
        ["Luka Modrić", "Toni Kroos"],
        ["Arjen Robben", "Franck Ribéry"],
        ["Mohamed Salah", "Sadio Mané"],
        ["Neymar", "Antoine Griezmann"],
        ["Kevin De Bruyne", "Bernardo Silva"],
        ["Jude Bellingham", "Pedri"],
        ["Phil Foden", "Jamal Musiala"],
        ["Vinícius Júnior", "Rodrygo"],
        ["Bukayo Saka", "Gabriel Martinelli"],
        ["Lautaro Martínez", "Julián Álvarez"],
        ["Declan Rice", "Enzo Fernández"],
        ["Achraf Hakimi", "João Cancelo"],
        ["Virgil van Dijk", "Kalidou Koulibaly"],
        ["Harry Kane", "Robert Lewandowski"],
        ["Karim Benzema", "Gonzalo Higuaín"],
        ["Paulo Dybala", "Lautaro Martínez"],
        ["Frenkie de Jong", "Gavi"],
        ["Raphinha", "Ousmane Dembélé"],
        ["Romelu Lukaku", "Álvaro Morata"],
        ["Ángel Di María", "James Rodríguez"],
        ["Eden Hazard", "Marco Reus"],
        ["Zlatan Ibrahimović", "Olivier Giroud"],
        ["Fernando Torres", "David Villa"],
        ["Didier Drogba", "Samuel Eto’o"],
        ["Andrea Pirlo", "Xavi Hernández"],
        ["Andrés Iniesta", "Cesc Fàbregas"],
        ["Thiago Silva", "Marquinhos"],
        ["Gianluigi Buffon", "Iker Casillas"],
        ["Petr Čech", "Edwin van der Sar"],
        ["John Terry", "Rio Ferdinand"],
        ["Paolo Maldini", "Alessandro Nesta"],
        ["Cafu", "Dani Alves"],
        ["Claudio Marchisio", "Daniele De Rossi"],
        ["Sergio Busquets", "Casemiro"],
        ["N’Golo Kanté", "Jorginho"],
        ["Thomas Müller", "Mario Götze"],
        ["Mesut Özil", "David Silva"],
        ["Xabi Alonso", "Michael Carrick"],
        ["Clarence Seedorf", "Edgar Davids"],
        ["Ronaldinho", "Kaká"],
        ["Ronaldo Nazário", "Rivaldo"],
        ["Pelé", "Diego Maradona"]
      ]
    }
  ]
}

Yazar	Mesaj Konu Arama Topic Seçenekleri Yanıt Yaz Yeni Konu Oluştur Konuyu Yazdır Çeviri Konu
kaanl0 Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Yeni Üye Kayıt Tarihi: 16 Eylül 2025 Konum: konya Durum: Aktif Değil Puanlar: 2	Mesaj Seçenekleri Yanıt Yaz Alıntı kaanl0 Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Konu: Jsondan rastgele veri çekme Gönderim Zamanı: 6 Saat 57 Dakika Önce Saat 16:45
	var mainform : tclform; void jsonV var words, word:String; i: Integer; { words=clomosy.getunittext('categorywords'); word= Clomosy.CLParseJSON(words, 'categories.'+IntToStr(i)+'.pairs.0.0'); ShowMessage(word); } { mainform = TclForm.Create(Self); mainform.run; jsonV; } ------------------------------------------------------ Clomosynin textindeki Json yapısından veri çekiyorum ama bunu rastgele yapmam gerek bunu nasıl yapabilirim -----------Kullandığım JSON------------ { "categories": [ { "id": 1, "name": "Futbolcular", "pairs": [ ["Cristiano Ronaldo", "Lionel Messi"], ["Frank Lampard", "Steven Gerrard"], ["Wayne Rooney", "Robin van Persie"], ["Sergio Ramos", "Gerard Piqué"], ["Mesut Özil", "İlkay Gündoğan"], ["Arda Turan", "Emre Belözoğlu"], ["Roberto Carlos", "Marcelo"], ["Erling Haaland", "Kylian Mbappé"], ["Luka Modrić", "Toni Kroos"], ["Arjen Robben", "Franck Ribéry"], ["Mohamed Salah", "Sadio Mané"], ["Neymar", "Antoine Griezmann"], ["Kevin De Bruyne", "Bernardo Silva"], ["Jude Bellingham", "Pedri"], ["Phil Foden", "Jamal Musiala"], ["Vinícius Júnior", "Rodrygo"], ["Bukayo Saka", "Gabriel Martinelli"], ["Lautaro Martínez", "Julián Álvarez"], ["Declan Rice", "Enzo Fernández"], ["Achraf Hakimi", "João Cancelo"], ["Virgil van Dijk", "Kalidou Koulibaly"], ["Harry Kane", "Robert Lewandowski"], ["Karim Benzema", "Gonzalo Higuaín"], ["Paulo Dybala", "Lautaro Martínez"], ["Frenkie de Jong", "Gavi"], ["Raphinha", "Ousmane Dembélé"], ["Romelu Lukaku", "Álvaro Morata"], ["Ángel Di María", "James Rodríguez"], ["Eden Hazard", "Marco Reus"], ["Zlatan Ibrahimović", "Olivier Giroud"], ["Fernando Torres", "David Villa"], ["Didier Drogba", "Samuel Eto’o"], ["Andrea Pirlo", "Xavi Hernández"], ["Andrés Iniesta", "Cesc Fàbregas"], ["Thiago Silva", "Marquinhos"], ["Gianluigi Buffon", "Iker Casillas"], ["Petr Čech", "Edwin van der Sar"], ["John Terry", "Rio Ferdinand"], ["Paolo Maldini", "Alessandro Nesta"], ["Cafu", "Dani Alves"], ["Claudio Marchisio", "Daniele De Rossi"], ["Sergio Busquets", "Casemiro"], ["N’Golo Kanté", "Jorginho"], ["Thomas Müller", "Mario Götze"], ["Mesut Özil", "David Silva"], ["Xabi Alonso", "Michael Carrick"], ["Clarence Seedorf", "Edgar Davids"], ["Ronaldinho", "Kaká"], ["Ronaldo Nazário", "Rivaldo"], ["Pelé", "Diego Maradona"] ] } ] }