TJSONArray Charset

[yhackup]

Merhabalar,
Datasnap uygulamasında json array create edip dönüyorum ancak türkçe karakter desteklemiyor bunu nasıl çözerim.

   Result := TJSONArray.Create;
  try
    Result.Add(AddPair('1','ADANA'));
    Result.Add(AddPair('4','FISTIKÇIŞAHAP'));
    Result.Add(AddPair('6','ANKARA'));
  finally
    //
  end;

{"result":[[{"value":"1","text":"ADANA"},{"value":"4","text":"FISTIK\u00C7I\u015EAHAP"},{"value":"6","text":"ANKARA"}]]}

[Tuğrul HELVACI]

Json string'i düzgün oluşmuş görünüyor.

[yhackup]

Evet sorun yokmuş