FreePascal.ru

Разобрался вроде. Дело в кодировке. Сервер отдает в UTF-8.
Функция UTF8ToSys отдает строку со знаком вопроса вначале. Сделал пока чтобы сервер отдавал 1251.

Добавлено спустя 1 минуту 8 секунд:
Кофейная гуща показывает, что у тебя ошибка в 7 строке.
Что именно ты делаешь с этим текстом в мемо ...

Вот скрины ошибок

Добрый день. Давно не программил ничего, да и ранее не работал с JSON.
В целом понятно пока все, но появился вопрос.
По различным примерам из инета, я получил данные из URL
procedure TForm1.Button3Click(Sender: TObject);
var
url, html : String;
begin
url := 'http://enduristov ...