pastojs: mark record fields as used when passing record to a jsvalue parameter

packages/fcl-passrc/src/pasuseanalyzer.pas

@@ -2722,7 +2722,7 @@ procedure TPasAnalyzer.UseRecordFields(El: TPasExpr);
   var
     ResolvedEl: TPasResolverResult;
   begin
-    UseElement(V,rraNone,false);
+    UseElement(V,rraRead,false);
 
     // check nested record
     Resolver.ComputeElement(V.VarType,ResolvedEl,[],V);