TTMSFNCCloudGoogleDriveItem.FromJSON problem

FNC TMS FNC Cloud Pack
1

Hello,

According to REST Resource: files  |  Google Drive  |  Google Developers
'parents' is an array of string, and no more an array of Objects like in v2

TTMSFNCCloudGoogleDriveItem.FromJSON() should be:


procedure TTMSFNCCloudGoogleDriveItem.FromJSON(jo: TJSONValue);
begin
  { ... }
  if Assigned(jp) and (TTMSFNCUtils.GetJSONArraySize(jp) > 0) then
  begin
    ParentID := TTMSFNCUtils.GetJSONArrayItem(jp,0).AsString;
  end;
  { ... }
end;
2

Hi,

Thank you for notifying. This issue has been fixed and the update will be available with the next TMS FNC Cloud Pack release.