contactlist.mxml

用ACTIONSCRIPT编写的简单实时消息发送软件源代码。开发平台为FLEX。

<?xml version="1.0" encoding="utf-8"?>
<mx:Panel 	xmlns:mx="http://www.adobe.com/2006/mxml" 
			layout="absolute" 
			width="190" 
			height="580"
			title="Contact List"
			mouseDown="dragStart()"
			mouseUp="dragStop()" >
			
	<mx:Script>
		<![CDATA[
			
			function dragStart():void
			{
				if (titleBar.hitTestPoint(stage.mouseX, stage.mouseY, true))
				{
					startDrag();
				}
			}
			
			function dragStop():void
			{
				if (titleBar.hitTestPoint(stage.mouseX, stage.mouseY, true))
				{
					stopDrag();
				}
			}
			
		]]>
	</mx:Script>
			
	<mx:VBox width="100%" height="100%" top="5" bottom="5" left="5" right="5">
		<mx:HBox width="100%" horizontalGap="15">
			<mx:Button id="bt_message" label="Message" click="parentApplication.bt_message_buddy()"/>
			<mx:Button id="bt_remove" label="Remove" click="parentApplication.bt_remove_buddy()"/>
		</mx:HBox>

		<mx:List 	id="list_buddies" 
					height="100%"
					width="100%" 
					iconFunction="parentApplication.blistIconFunction" />
		
		<mx:RadioButton groupName="status"
						label="Available"
						id="rb_available" 
						value="0"
						click="parentApplication.handle_status_change(event)" />
			
		<mx:RadioButton groupName="status"
						label="Be right back"
						id="rb_brb" 
						value="1"
						click="parentApplication.handle_status_change(event)" />
		
		<mx:RadioButton groupName="status"
						label="Busy"
						id="rb_busy"
						value="2" 
						click="parentApplication.handle_status_change(event)" />
		
		<mx:HRule width="100%" />
		
		<mx:HBox width="100%" horizontalAlign="center">
			<mx:Button id="bt_logout" label="Logout" click="parentApplication.bt_logout_click(event)"/>
		</mx:HBox>
		
	</mx:VBox>
</mx:Panel>