<p>Am 22.08.2016 15:16 schrieb "Michael Van Canneyt" <<a href="mailto:michael@freepascal.org">michael@freepascal.org</a>>:<br>
><br>
><br>
><br>
> On Mon, 22 Aug 2016, Dave Connolly wrote:<br>
><br>
>>> From what I can see the error seems to involve these two lines in the<br>
>><br>
>> procedure TBaseObject.SetObjectProperty(P: PPropInfo; AValue: TJSONObject);<br>
>> in restbase.pp (fcl-web)<br>
>><br>
>>    PA:=@(pdynarraytypeinfo(P^.PropType)^.elesize)+i;<br>
>>    PA:=@(pdynarraytypeinfo(P^.PropType)^.eletype)+i;<br>
>><br>
>><br>
>>    AN:=PTYpeInfo(PA^)^.Name;<br>
>><br>
>> In my scenario the PTYpeInfo(PA^)^.Name is "t???/t???/t???/t0t@0t"<br>
>><br>
>> FPC 3.1.1 revision 34368<br>
><br>
><br>
> I suspect this has to do with the additional level of indirection added by<br>
> Sven Barth. I will need to check that.</p>
<p>Best don't use pdynarraytypeinfo as that doesn't correctly handle alignment either, use PTypeData instead.</p>
<p>Regards,<br>
Sven</p>