Как правильно преобразовать данные JSON (полученные с сервера REST) ​​в AnsiString (Windows-1250) в Delphi?

Question

Может кто-нибудь ПОЖАЛУЙСТА объяснить мне, как привести значение из TJSONObject к AnsiString (1250).Когда я вызываю конечную точку с сервера REST в браузере, я получаю правильные данные, но когда я пытаюсь прочитать те же данные в Delphi, они искажаются (пример «đ» становится «ð» или «ć» становится «ae» и т. Д.)

var
 o :TJSONObject;
 fJSONArray :TJSONArray;
begin

  ...

  fJSONArray := TJSONObject.ParseJSONValue(RESTResponse.Content) as TJSONArray;
  recCount := fJSONArray.Count;

  if recCount = 0 then Exit; 

  impTrans.StartTransaction;
  sqlClearPP.Execute;

  o := fJSONArray.Items[0] as TJSONObject;


  if Assigned(o.GetValue('ADR'))
   then sqlInsPP.ParamByName('ADR').AsWideString  := Trim(AnsiDequotedStr(o.GetValue('ADR').toString, '"')) // text gets distorted
   else sqlInsPP.ParamByName('ADR').AsWideString  :=  ' ';