FreePascal.ru

Товарищ мне сильно помог, дав недостающий код...
var
IdHTTP1: THTTPSend;

IdHTTP1.Headers.Add('Authorization: Token ' + Token);
IdHTTP1.Headers.Add('Accept: ' + Accept);
IdHTTP1.Headers.Add('Content-Type: ' + ContentType);
IdHTTP1.Headers.Add('X-Secret: ' + SecretApi);
IdHTTP1.Document.Write ...

Оба файла libeay32.dll и ssleay32.dll лежат в текущей папке...
И что интересно, что "Город" и "Остаток" - отлично читаются, а если нужно что-то отправить туда, то возвращается 200, но пустая строка...
Я думаю, если бы проблема была в этих DLL, то и Город с Остатком не читались бы...
Пойду поищу ...

Я прошу прощения, может кто знает, как считывать данные с dadata.ru из Лазаруса с помощью Synapse - спокойно считываю через Питон, но не могу считать Лазарусом...
Вот код, в нем много отладочных сообщений...
Получаю ResultString = 200, но возвращает пустую строку... :(

function GetDaData(URL ...

Добрый день.
Я тут в первый раз - не ругайтесь пожалуйста, если что не так...
Итак, я нашел код и считываю страницу https://mingkh.ru/rating/krasnodarskiy-kray/novorossiysk/ ( или любые другие города ), там есть блоки ( взят случайный фрагмент страницы, выгруженной в файл )
<tr>
<td>7 <span ...