Open jrathlev opened 1 year ago
Proposed workaround:
{$IF CompilerVersion <31.0} // 10.1 Berlin type TStringListHelper = class helper for TStringList function AddPair (const AName,AValue : string) : integer; end; { ------------------------------------------------------------------- } function TStringListHelper.AddPair (const AName,AValue : string) : integer; begin Result:=Add(AName+NameValueSeparator+AValue); end; {$ENDIF}
Propsed change:
JSO2 := JSA.Items[0] as tjsonobject;
Thanks, I'll install a Seattle on a VM and will update the library soon.
Proposed workaround:
Propsed change:
JSO2 := JSA.Items[0] as tjsonobject;