Here's a simle way of making the blow-up cow:

 Manipulate[
 Show[ExampleData[{"Geometry3D", "Cow"}], 
 Graphics3D[Sphere[{-.1, 0, 0.05}, r]]], {r, 0, 0.5}, 
 ContinuousAction -> False, SynchronousUpdating -> False]