有没有兴趣大家一起来做个聊天的系统

2gua

有点儿意思啦。

kfdcw

好，做好了我拿来卖钱钱。。。

kfdcw

没有我的参与，估计半年不会有什么进展。。。

alan_yang

Flex的客户端



main.mxml

1. 
   
2. <?xml version="1.0" encoding="utf-8"?>
   
3. <mx:Application xmlns:mx="http://www.adobe.com/2006/mxml" layout="absolute" creationComplete="init()" backgroundColor="#AAAAAA">
   
4.         <mx:Panel layout="absolute" left="10" right="10" top="10" bottom="10">
   
5.                 <mx:TextArea id="mainText" top="10" left="10" right="10" bottom="40"/>
   
6.                 <mx:TextInput id="msg" left="10" right="72" bottom="10"/>
   
7.                 <mx:Button id="sendBtn" label="Send" right="10" bottom="10"/>
   
8.         </mx:Panel>
   
9.         <!--mx:Style source="assets/style.css" /-->
   
10.         <mx:Script>
    
11.                 <![CDATA[
    
12.                 import flash.net.*;
    
13.                 import mx.managers.PopUpManager;
    
14.                 private const PORT:int = 4657;
    
15.                 private const HOST:String = "61.129.51.204";
    
16.                 private var svrMsg:String = "";
    
17.                 private var clientSocket:Socket = new Socket;
    
18.                 private var loginPanel:Login = new Login;
    
19.                 private function init():void
    
20.                 {
    
21.                         this.msg.addEventListener(KeyboardEvent.KEY_DOWN,onKeyDown);
    
22.                         this.sendBtn.addEventListener(MouseEvent.CLICK,onSend);
    
23.                         this.clientSocket.addEventListener(Event.CONNECT,onConnect);
    
24.                         this.clientSocket.addEventListener(Event.CLOSE,onClose);
    
25.                         this.clientSocket.addEventListener(ProgressEvent.SOCKET_DATA,onData);
    
26.                         PopUpManager.addPopUp(loginPanel,this,true);
    
27.                         PopUpManager.centerPopUp(loginPanel);
    
28.                         connectToServer();       
    
29.                 }
    
30.                 private function connectToServer():void
    
31.                 {
    
32.                         try{
    
33.                                 this.clientSocket.connect(HOST,PORT);
    
34.                         }catch(e:Error){
    
35.                                 return;
    
36.                                 //this.nativeApplication.exit(0);
    
37.                         }
    
38.                         this.clientSocket.writeMultiByte("<main_action>setNickName</main_action><nickname>"+loginPanel.nickName+"</nickname>","gb2312");
    
39.                         this.clientSocket.flush();
    
40.                 }
    
41.                 private function onConnect(e:Event):void
    
42.                 {
    
43.                         svrMsg+="connect to server! \n";
    
44.                         updateMsg();
    
45.                 }
    
46.                 private function onClose(e:Event):void
    
47.                 {
    
48.                         svrMsg+="connect close! \n";
    
49.                         updateMsg();
    
50.                 }
    
51.                 private function onData(e:ProgressEvent):void
    
52.                 {
    
53.                         svrMsg+=this.clientSocket.readMultiByte(this.clientSocket.bytesAvailable,"gb2312")+"\n";
    
54.                         updateMsg();
    
55.                 }
    
56.                 private function onSend(e:MouseEvent):void
    
57.                 {
    
58.                         send();
    
59.                 }
    
60.                 private function onKeyDown(e:KeyboardEvent):void
    
61.                 {
    
62.                         if(13==e.charCode)
    
63.                         {
    
64.                                 send();
    
65.                         }
    
66.                 }
    
67.                 private function send():void
    
68.                 {
    
69.                         var temp:String = "<main_action>sendMsg</main_action><nickname>Alan</nickname><msg>"+this.msg.text+"</msg>"
    
70.                        
    
71.                         this.clientSocket.writeMultiByte(temp,"gb2312");
    
72.                         this.clientSocket.flush();
    
73.                         this.msg.text = "";
    
74.                 }
    
75.                 private function updateMsg():void
    
76.                 {
    
77.                         mainText.text = svrMsg;
    
78.                 }
    
79.                 ]]>
    
80.         </mx:Script>
    
81. </mx:Application>
    
82. 
    

复制代码

Login.mxml

1. 
   
2. <?xml version="1.0" encoding="utf-8"?>
   
3. <mx:TitleWindow xmlns:mx="http://www.adobe.com/2006/mxml" layout="absolute" width="270" height="84" title="Input your name">
   
4.         <mx:TextInput id="txt" x="10" y="12" keyDown="if(13==event.charCode)onClick();"/>
   
5.         <mx:Button x="178" y="12" label="Button" click="onClick()"/>
   
6.         <mx:Script>
   
7.                 <![CDATA[
   
8.                 import mx.managers.PopUpManager;
   
9.                 public var nickName:String = "";
   
10.                 private function onClick():void
    
11.                 {
    
12.                         PopUpManager.removePopUp(this);
    
13.                         name = txt.text;
    
14.                 }
    
15.                 ]]>
    
16.         </mx:Script>       
    
17. </mx:TitleWindow>
    

复制代码

alan_yang

服务器没放跨域策略文件,网页上用这个会被安全沙箱挡住....大家想用还是下到本机用吧

http://kid.moker.com/img/Client.swf

[ 本帖最后由 alan_yang 于 2008-7-18 17:20 编辑 ]

untrod

等，我加一个跨域文件吧

aol365

服务器支持我可以提供的 机器配置还不错的：）不过貌似不能24小时开放 可以么？

aol365

有个可以24小时开放的 但是配置又不怎么好 只有512m的内存

untrod

我有服务器，现在就是24小时开放

gambia

看来真是人多力量大啊，新手关注中~