Как конвертировать массив со структурой данных в json структуру и отправить его в php методом POST

[jiny007]

Delphi 11.3

структуры данных

   TAnketAnswStru = record
    ID,
    ID_ORG,
    ID_DEVICE,ID_ANKET,ID_QUESTIONS,ID_ANSWER,ID_CONSTANT_ANSW : INTEGER;
    REAL_DATE_CREATED: string;
    IS_NO_ANSWER_FLAG,IS_CONSTANT_QUESTION,
    IS_DELETED,
    FLAG_CHANGED,
    FLAG_SENDED: boolean;
    FLAG_SENDED_WHEN:string;
    IS_MAIN_ELEMENT: boolean;
    RECEIVED_FROM_ID: smallint;
    RECEIVED_WHEN: string;
    RECEIVED_FLAG: BOOLEAN;
    CREATED_USER: string;
    CREATED_DATE: string;
    CHANGED_USER: string;
    CHANGED_DATE: string;
    DELETED_USER: string;
    DELETED_DATE: string;
   end;

   TAnketAnswAltStru = record
    ID,
    ID_ORG,
    ID_DEVICE,ID_ANKET,ID_QUESTIONS,ID_ANSWER,ID_THEME: INTEGER;
    IS_DELETED,
    FLAG_CHANGED,
    FLAG_SENDED: boolean;
    NAME,FLAG_SENDED_WHEN:string;
    IS_MAIN_ELEMENT: boolean;
    RECEIVED_FROM_ID: smallint;
    RECEIVED_WHEN: string;
    RECEIVED_FLAG: BOOLEAN;
    CREATED_USER: string;
    CREATED_DATE: string;
    CHANGED_USER: string;
    CHANGED_DATE: string;
    DELETED_USER: string;
    DELETED_DATE: string;
   end;

   TAnketStru = record
    ID,
    ID_ORG,
    ID_DEVICE: INTEGER;
    REAL_DATE_CREATED: string;
    DATE_ANKET: string;
    LATITUDE,
    LONGITUDE: EXTENDED;
    NAME_TERRITORY: STRING;
    ID_NASELP,
    ID_RAYON,
    ID_THEME: integer;
    COMMENTS,
    RID: string;
    IS_DELETED,
    FLAG_CHANGED,
    FLAG_SENDED: boolean;
    FLAG_SENDED_WHEN:string;
    IS_MAIN_ELEMENT: boolean;
    RECEIVED_FROM_ID: smallint;
    RECEIVED_WHEN: string;
    RECEIVED_FLAG: BOOLEAN;
    CREATED_USER: string;
    CREATED_DATE: string;
    CHANGED_USER: string;
    CHANGED_DATE: string;
    DELETED_USER: string;
    DELETED_DATE: string;
    ANSWERS: array of TAnketAnswStru;
    ANSWERS_ALT: array of TAnketAnswAltStru;
   end;

массив динамический arrAnk: array of TAnketStru;

Задача создать из массива json массив и передать в php обработчик.

Хотя бы подскажите, есть ли функция или процедура конвертации подобных данных или надо вручную создавать каждый элемент в цикле ?

до этого передавал каждую запись методом пост, ждал подтверждения от php и помечал запись как отправленную.

Решил отправлять оптом, так как андроид планшет не справляется с отправкой даже 500 записей (к каждой из этих записей, анкет прилагаются выбранные ответы и альтернативные ответы). Отправка слишком долгая, думаю, если отправить полный набор данных, будет быстрее, так как сервер мощный и обработку json решит на раз.

Изменено 17 августа пользователем jiny007
дополнил

[jiny007]

спасибо мне и гуглу, тема закрыта