I am converting this code with the component (TFPHttpClient)
TFPHttpClient run without problem.
var
IdHTTPxx1: TIdHTTP;
MPData: TIdMultiPartFormDataStream;
LD, D: TJSONData;
jItem: TJSONData;
Obj, SubObj: TJSONObject;
Arr: TJSONArray;
sResponse: string;
sValue, S: string;
i: integer;
jData, jData2: TJSONData;
jArray, jArray2: TJSONArray;
Parseur: TJSONParser;
jObject: TJSONObject;
myServerOCR : String;
....
try
IdHTTPxx1 := TIdHTTP.Create(nil);
IdHTTPxx1.Request.ContentType := 'application/x-www-form-urlencoded';
MPData := TIdMultiPartFormDataStream.Create;
{$IFDEF DARWIN}
S := opath + '/Contents/Resources/temp.jpg';
//showmessage(s);
{$ELSE}
S := ExtractFilePath(ParamStr(0)) + 'temp.jpg';
{$ENDIF}
MPData.AddFile('file', S, 'image/jpg');
MPData.AddFormField('apikey', ApiKey);
MPData.AddFormField('language', lngFromOCR);
MPData.AddFormField('isOverlayRequired', 'False');
// IdHTTPxx1.Request.CharSet := 'utf-8';
sResponse := IdHTTPxx1.Post(myServerOCR, MPData ,IndyTextEncoding_UTF8);
// ShowMessage(sResponse);
jData := GetJSON(sResponse);
parseur := TJSONParser.Create(sResponse);