* allow the buffer passed to Make() to be Nil

git-svn-id: trunk@36981 -

packages/rtl-objpas/src/inc/rtti.pp

@@ -549,6 +549,8 @@ begin
   result.FData.FTypeInfo:=ATypeInfo;
   { resets the whole variant part; FValueData is already Nil }
   Result.FData.FAsUInt64 := 0;
+  if not Assigned(ABuffer) then
+    Exit;
   case ATypeInfo^.Kind of
     tkSString  : result.FData.FValueData := TValueDataIntImpl.CreateCopy(ABuffer, Length(PShortString(ABuffer)^) + 1, ATypeInfo, True);
     tkWString,