Finding all constraints

Someone recently asked about finding all the constraints in a scene. My first thought was to do this:

var x = new ActiveXObject( "XSI.Collection" );
x.Items = "*.kine.Constraints.*";

But it turns out that the '''Local Transform''' is also nested under kine.Constraints.

So then I considered using a filter. There is a built-in filter Obj_w_Constraint finds all objects with constraints. So you could use that to filter a list of all objects, and then go through the collection of objects with constraints, and use Kinematics.Constraints to build a collection of all the constraints.

As a side note, here's the implementation of the filter:

Function ObjWConstraint_Match( in_context ) ObjWConstraint_Match = false
   set in_obj = in_context.GetAttribute( "Input" )
   if IsA3DObject( in_obj ) then
       ObjWConstraint_Match = in_obj.IsNodeAnimated( siConstraintSource, true )
   end if
end Function