As3.0 元件 錨點 設置

       //錨點設置
        function RegPoint( obj:Sprite ,  point:Point):void  
        {  
             var tmp_point:Point = obj.parent.globalToLocal( obj.localToGlobal( point));  
             var len:int = obj.numChildren;  
             while (len--)  
             {  
                  var tmp_obj:DisplayObject =  obj.getChildAt(len);  
                  tmp_obj.x -=   point.x;  
                  tmp_obj.y -=   point.y;  
              }  
              obj.x = tmp_point.x;  
              obj.y = tmp_point.y;  
        }