Json.Serializer fpc sample updated

samples/fpc/QuickJsonSerializer/JsonSerializer.lpi

@@ -39,6 +39,7 @@
         <Filename Value="main.pas"/>
         <IsPartOfProject Value="True"/>
         <ComponentName Value="Form1"/>
+        <HasResources Value="True"/>
         <ResourceBaseClass Value="Form"/>
       </Unit1>
       <Unit2>

samples/fpc/QuickJsonSerializer/main.pas

@@ -154,7 +154,7 @@ implementation
 
 procedure TForm1.btnToJsonClick(Sender: TObject);
 begin
-  Memo1.Text := serializer.ObjectToJson(User);
+  Memo1.Text := serializer.ObjectToJson(User,True);
   btnFromJson.Enabled := True;
 end;