Do not check expected type, since model compatibility is now ensured …

…by OSS service. #20
Embarcadero · Dec 7, 2024 · c3780ad · c3780ad
1 parent 80424c8
commit c3780ad
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/Source/BoldExternalObjectSpaceEventHandler.pas b/Source/BoldExternalObjectSpaceEventHandler.pas
@@ -397,8 +397,8 @@ procedure TBoldExternalObjectSpaceEventHandler.NonEmbeddedStateOfObjectChanged(
   CurrObj := GetObjectByID(AObjectID);
   if Assigned(CurrObj) then
   begin
-    if CurrObj.BoldClassTypeInfo.ExpressionName <> AClassName then
-      raise EOSS.CreateFmt('Object %s is %s, but expected type is %s.', [AObjectID.AsString, CurrObj.BoldClassTypeInfo.ExpressionName, AClassName]);
+//    if CurrObj.BoldClassTypeInfo.ExpressionName <> AClassName then
+//      raise EOSS.CreateFmt('Object %s is %s, but expected type is %s.', [AObjectID.AsString, CurrObj.BoldClassTypeInfo.ExpressionName, AClassName]);
     i := CurrObj.BoldMemberIndexByExpressionName[AMemberName];
     if i = -1 then
       raise EOSS.CreateFmt('Class %s does not have a member "%s", check OSS settings of other clients.', [CurrObj.DisplayName, AMemberName]);