<html>
<head>
<meta content="text/html; charset=UTF-8" http-equiv="Content-Type">
</head>
<body smarttemplateinserted="true" text="#000000" bgcolor="#FFFFFF">
<div id="smartTemplate4-template"><br>
Hi,<br>
huh, why does the build suddenly fail?<br>
<p>Well, FPC 3.0.0 does not have the joStrict option. <br>
It is only there in 3.1.1. <br>
</p>
Perhaps there should be two fpc parser entries.<br>
<br>
Best,<br>
Benito </div>
<br>
<br>
<div class="moz-cite-prefix">On 06.11.2016 17:34, Benito van der
Zander wrote:<br>
</div>
<blockquote
cite="mid:c927532f-3786-f25c-3ff4-f2b12d6eec5f@benibela.de"
type="cite">
<meta http-equiv="Context-Type" content="text/html; charset=utf-8">
<div id="smartTemplate4-template">Hi,<br>
<br>
it is better to use TJSONParser than GetJSON.<br>
<br>
GetJSON is defined as:<br>
<br>
procedure DefJSONParserHandler(AStream: TStream; const AUseUTF8:
Boolean; out<br>
Data: TJSONData);<br>
<br>
Var<br>
P : TJSONParser;<br>
<br>
begin<br>
Data:=Nil;<br>
P:=TJSONParser.Create(AStream,[joUTF8]);<br>
try<br>
Data:=P.Parse;<br>
finally<br>
P.Free;<br>
end;<br>
end;<br>
<br>
with<br>
<br>
procedure DefJSONParserHandler(AStream: TStream; const AUseUTF8:
Boolean; out<br>
Data: TJSONData);<br>
<br>
Var<br>
P : TJSONParser;<br>
<br>
begin<br>
Data:=Nil;<br>
P:=TJSONParser.Create(AStream,[<b>joStrict,</b>joUTF8]);<br>
try<br>
Data:=P.Parse;<br>
finally<br>
P.Free;<br>
end;<br>
end;<br>
<br>
it should pass more<br>
<br>
<br>
Best,<br>
<p>Benito </p>
</div>
<br>
<p><br>
</p>
</blockquote>
<br>
</body>
</html>