JSON, TJSONArray::Get(int ) deprecated

[Axbor]

TJSONObject *o = (TJSONObject*) TJSONObject::ParseJSONValue(TEncoding::UTF8->GetBytes(result),0);
TJSONArray *a = (TJSONArray*) o->Get("posts")->JsonValue;
for (int idx = 0; idx < a->Size(); idx++) {
	TJSONObject *post = (TJSONObject*) a->Get(idx);
	Title = post->Pairs[5]->JsonValue->ToString();
	Title = Title.SubString(1, Title.Length() - 2);
	TJSONObject *author = (TJSONObject*) post->Get("author")->JsonValue;
	Jurnalist = author->Pairs[2]->JsonValue->ToString();
	TJSONArray *categoryarr = (TJSONArray*) post->Get("categories")->JsonValue;
	TJSONObject *category = (TJSONObject*) categoryarr->Get(0);
	Category = category->Pairs[2]->JsonValue->ToString();
	Category = Category.SubString(1, Category.Length() - 2);
	Content = post->Pairs[8]->JsonValue->ToString();
	Date = post->Pairs[9]->JsonValue->ToString();
	ContentFull = post->Pairs[7]->JsonValue->ToString();
}

Написал вот такой код на Embarcadero RX 10 Seatle. Компилятор меня оповещает вот такими предупреждениями: Accessing deprecated entity '_fastcall TJSONArray::Size()'

Accessing deprecated entity '_fastcall TJSONArray::Get(const int)' и т.д.

(Я прекрасно понимаю что эти сообщения значит). Хотелось бы узнать что сейчас используется вместо этих функций? И куда надо посмотреть в таких случаях?

Изменено 12 июля, 2016 пользователем Axbor

[ArturAD]

Используйте Count.

О чем и говорит справка:

 

Цитата

 

Warning: Size is deprecated. Please use Count.

Returns the size of the JSON array.

Call Size to obtain the size of the JSON array.

 

 

[Axbor]

1 час назад, ArturAD сказал:

Используйте Count.

О чем и говорит справка:

 

 

О, даже не заметил такого!! Спасибо.