You are not logged in.
Hi, Windows 10 pro, Rin 10.3.3 ent
TtcpParkCLientBase=Class(TInterfacedObject);
TObejctWithObejctSetGet = class(TtcpParkCLientBase,ItcpParkClientCustom)
published
...
property MyObject: TMyObject read GetMyObject write setMyObject; // if we omit write setBarieraObj we get exception from json to object
...
Interfaced service:
TParkingsArray=class(TObjectList);
procedure TAllParkService.GetObjectList(const DeviceID: integer;[b]out Park: TParkingsArray[/b]; out Err: Integer);
begin
// here we return objectlist of TtcpParkClientCustom objects and when method returns framework throws exception (without write setBarieraObj)
end;
Thank you ,
Vojko Cendak
Offline