diff --git a/designer/jitforms.pp b/designer/jitforms.pp index 4fe0768489..c58738f116 100644 --- a/designer/jitforms.pp +++ b/designer/jitforms.pp @@ -1506,7 +1506,7 @@ begin // set TypeData (PropCount is the total number of properties, including ancestors) NewTypeData^.ClassType:=TClass(NewVMT); - {$IF FPC_FULLVERSION>30000} + {$IF FPC_FULLVERSION>=30100} NewTypeData^.ParentInfoRef:=AncestorClass.ClassInfo; {$ELSE} NewTypeData^.ParentInfo:=AncestorClass.ClassInfo;