9 年之前 · d4a0fcecd9
--- a/packages/fcl-json/src/jsonscanner.pp
+++ b/packages/fcl-json/src/jsonscanner.pp
@@ -62,7 +62,6 @@ Type
 
				 
			
 
				   TJSONScanner = class
			
 
				   private
			
 
				-    FAllowComments: Boolean;
			
 
				     FSource : TStringList;
			
 
				     FCurRow: Integer;
			
 
				     FCurToken: TJSONToken;