flex控件拖拽效果

<?xml version="1.0" encoding="utf-8"?>
<mx:Application xmlns:mx="http://www.adobe.com/2006/mxml" layout="absolute" backgroundColor="#D99191">
<mx:Array id="coffeeArray">
</mx:Array>
<mx:Script>
	<![CDATA[
	 	internal function InitLs():void
	 	{
	 		var srcArr:Array = new Array();
	 		srcArr.push("China Soft");
	 		srcArr.unshift("BOCO");
	 		srcArr.unshift("PCCW");
	 		SrcLs.dataProvider = srcArr;
			var desArr:Array = new Array("PM", "PL", "SE");
			DesLs.dataProvider=desArr;
	 	}
	 	
//	 	控件拖拽效果
	 	internal function MovLs():void
	 	{
	 		SrcLs.dragEnabled = true;
	 		SrcLs.dropEnabled = true;
			SrcLs.allowMultipleSelection = true;
			DesLs.dragEnabled = true;//
			DesLs.dropEnabled = true;
			var testDebStr:String = new String("Drag Success");
	 	}
	]]>
</mx:Script>
	<mx:List x="111" y="92" height="282" id="SrcLs" width="200"></mx:List>
	<mx:List x="568" y="92" height="282" id="DesLs" width="200"></mx:List>
	<mx:Button x="334" y="123" label="初始化" width="167" click="InitLs()"/>
	<mx:Button x="334" y="193" label="拖拽效果" width="167" click="MovLs()"/>
	<mx:Button x="334" y="282" label="Button" width="167"/>
</mx:Application>

效果图