diff --git a/rtl/objpas/classes/reader.inc b/rtl/objpas/classes/reader.inc
index 9bd66c4e1d..245283ff69 100644
--- a/rtl/objpas/classes/reader.inc
+++ b/rtl/objpas/classes/reader.inc
@@ -1149,6 +1149,7 @@ begin
     vaFalse,vaTrue:
       begin
         Result:=(nv<>vaFalse);
+        readValue;
       end;
     vaCurrency:
       begin