Chat_Dialog

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
using System.Threading;
using System.Net;
using System.Net.Sockets;
using System.Messaging;
using System.Reflection;

namespace JToolDemo.Tool_Chat
{
    public partial class Chat_Dialog : Chat_ParentClass
    {
        private string getParentClickValue = string.Empty;
        private DataInfo sendInfo;
        private DataInfo getInfo;
        Thread subFormSendDataThread;
        private Image[] emoticons;
        public Chat_Dialog(string value)
        {
            InitializeComponent();
            getParentClickValue = value;
        }

        /// <summary> 发送信息时用</summary>
        private UdpClient _childUdpClient;
        public UdpClient ChildUdpClient
        {
            set { _childUdpClient = value; }
            get { return _childUdpClient; }
        }

        /// <summary> 取得最小化之前的状态 窗体还原时候用</summary>
        private FormWindowState _minPreState;
        public FormWindowState MinPreState
        {
            set { _minPreState = value; }
            get { return _minPreState; }
        }

        private void Chat_Dialog_Load(object sender, EventArgs e)
        {
            //设置焦点
            this.writeTextBox.Select();
            //修改form名称
            this.Text = getParentClickValue;
            this.Name = getParentClickValue;
            getInfo = userInfoSeparate(getParentClickValue);
            //生成图片选择框 Load Emoticon Images
            Assembly asm = Assembly.GetExecutingAssembly();
            string name = asm.GetName().Name + ".Tool_Chat.";
            emoticons = new Image[9];
            emoticons[0] = new Bitmap(asm.GetManifestResourceStream(name + "Emoticons.AngelSmile.png"));
            emoticons[1] = new Bitmap(asm.GetManifestResourceStream(name + "Emoticons.AngrySmile.png"));
            emoticons[2] = new Bitmap(asm.GetManifestResourceStream(name + "Emoticons.Beer.png"));
            emoticons[3] = new Bitmap(asm.GetManifestResourceStream(name + "Emoticons.BrokenHeart.png"));
            emoticons[4] = new Bitmap(asm.GetManifestResourceStream(name + "Emoticons.ConfusedSmile.png"));
            emoticons[5] = new Bitmap(asm.GetManifestResourceStream(name + "Emoticons.CrySmile.png"));
            emoticons[6] = new Bitmap(asm.GetManifestResourceStream(name +  "Emoticons.DevilSmile.png"));
            emoticons[7] = new Bitmap(asm.GetManifestResourceStream(name + "Emoticons.EmbarassedSmile.png"));
            emoticons[8] = new Bitmap(asm.GetManifestResourceStream(name + "Emoticons.ThumbsUp.png"));

            // Create Emoticon DropDownMenu
            EmoticonMenuItem _menuItem;
            int _count = 0;
            foreach (Image _emoticon in emoticons)
            {
                _menuItem = new EmoticonMenuItem(_emoticon);
                _menuItem.Click += new EventHandler(cmenu_Emoticons_Click);
                if (_count % 2 == 0)
                    //_menuItem.BarBreak = true;
                    _menuItem.Break = true;

                cmenu_Emoticons.MenuItems.Add(_menuItem);
                ++_count;
            }
        }

        private void cmenu_Emoticons_Click(object _sender, EventArgs _args)
        {
            EmoticonMenuItem _item = (EmoticonMenuItem)_sender;
            try
            {
                this.writeTextBox.InsertImage(_item.Image);
            }
            catch (Exception _e)
            {
                MessageBox.Show("Rtf Image Insert Error\n\n" + _e.ToString());
            }
        }

        #region 局域网侦听
        /// <summary>
        /// 发送数据包到广播地址
        /// </summary>
        /// <param name="sendbStr"></param>
        private void sendPack()
        {
            DataInfo tempDataInfo = sendInfo;
            #region 不分包发送
            /*
            //Encoding.UTF8防止乱码
            byte[] sendb = Chat_CommonClass.ObjectToByteA(tempDataInfo);
            IPAddress tempAddress = IPAddress.Parse(tempDataInfo.ToMachineIp);
            IPEndPoint tempIpEndPoint = new IPEndPoint(tempAddress, PORT);
            try
            {
                
                _childUdpClient.Send(sendb, sendb.Length, tempIpEndPoint);
            }
            catch (Exception e)
            {
                MessageBox.Show(e.Message.ToString());
            }*/
            #endregion

            #region 分包发送
            int m_intBlockLength = 1400;

            IPAddress tempAddress = IPAddress.Parse(tempDataInfo.ToMachineIp);
            IPEndPoint tempIpEndPoint = new IPEndPoint(tempAddress, PORT);

            byte[] BTmp = Chat_CommonClass.ObjectToByteA(tempDataInfo);
            //发送信息的总长度
            int m_intMessageLength = BTmp.Length;
            //发送的包 序列数（0,1,2...）
            int m_intSerial = 0;
            //包数（需要分几包发送）
            int m_intBlocks = Convert.ToInt32(Math.Ceiling(Convert.ToDouble(m_intMessageLength) / Convert.ToDouble(m_intBlockLength))); //数据分割块数   
            //发送方ip
            string m_stringIP = tempDataInfo.FromMachineIp;
            //发送时间
            string m_stringNow = DateTime.Now.ToLongTimeString();

            //如果还有剩余的未发数据 接着发
            while (m_intMessageLength > 0)
            {
                try
                {
                    int m_intLength = m_intBlockLength; //数据长度 1000

                    if (m_intMessageLength < m_intLength)
                    {
                        m_intLength = m_intMessageLength;
                    }

                    //让IP固定为最大15位
                    byte[] byteIpTemp = new byte[15];
                    byte[] byteIp = Encoding.ASCII.GetBytes(m_stringIP);
                    Array.Copy(byteIp, byteIpTemp, byteIp.Length);
                    //让时间固定为最大8位
                    byte[] byteNowTemp = new byte[8];
                    byte[] byteNow = Encoding.ASCII.GetBytes(m_stringNow);
                    Array.Copy(byteNow, byteNowTemp, byteNow.Length);

                    //在包中加入15IP位 + 8位时间 + 16位标识位 每4位一组
                    byte[] data = new byte[15 + 8 + 16 + m_intLength];
                    
                    int place = 0;
                    Buffer.BlockCopy(byteIpTemp, 0, data, place, 15); //IP(最大15位)
                    place += 15;
                    Buffer.BlockCopy(byteNowTemp, 0, data, place, 8); //时间
                    place += 8;
                    Buffer.BlockCopy(BitConverter.GetBytes(m_intSerial), 0, data, place, 4); //顺序戳   
                    place += 4;
                    Buffer.BlockCopy(BitConverter.GetBytes(m_intBlocks), 0, data, place, 4); //数据总块数   
                    place += 4;
                    Buffer.BlockCopy(BitConverter.GetBytes(m_intLength), 0, data, place, 4); //数据长度   
                    place += 4;
                    Buffer.BlockCopy(BitConverter.GetBytes(BTmp.Length), 0, data, place, 4); //数据总长度   
                    place += 4;
                    Array.Copy(BTmp, m_intSerial * m_intBlockLength, data, 15 + 8 + 16, m_intLength); //复制数据   


                    _childUdpClient.Send(data, data.Length, tempIpEndPoint);
                    Thread.Sleep(20);
                    m_intSerial = m_intSerial + 1;//0,1,2...
                    m_intMessageLength = m_intMessageLength - m_intLength;//发送信息还剩下的数据长度(总长度-已经发送的长度 1000+16)
                }
                catch (System.Exception pe)
                {
                    MessageBoxEx.Show(pe.ToString());
                }
            }
            #endregion

            #region 队列消息模式
            /*
            //队列消息的服务路径
            string msgPath = @"web000\private$\msmqdemo";
            //新建一个系统消息对象;       
            System.Messaging.Message msg = new System.Messaging.Message();
            //新建一个消息队列对象;
            System.Messaging.MessageQueue msgQueue = new MessageQueue(msgPath);

            int m_intBlockLength = 1200;

            IPAddress tempAddress = IPAddress.Parse(tempDataInfo.ToMachineIp);
            IPEndPoint tempIpEndPoint = new IPEndPoint(tempAddress, PORT);

            byte[] BTmp = Chat_CommonClass.ObjectToByteA(tempDataInfo);
            //发送信息的总长度
            int m_intMessageLength = BTmp.Length;
            //发送的包 序列数（0,1,2...）
            int m_intSerial = 0;
            //包数（需要分几包发送）
            int m_intBlocks = Convert.ToInt32(Math.Ceiling(Convert.ToDouble(m_intMessageLength) / Convert.ToDouble(m_intBlockLength))); //数据分割块数   
            //发送方ip
            string m_stringIP = tempDataInfo.FromMachineIp;
            //发送时间
            string m_stringNow = DateTime.Now.ToLongTimeString();

            //如果还有剩余的未发数据 接着发
            while (m_intMessageLength > 0)
            {
                try
                {
                    int m_intLength = m_intBlockLength; //数据长度 1000

                    if (m_intMessageLength < m_intLength)
                    {
                        m_intLength = m_intMessageLength;
                    }

                    //让IP固定为最大15位
                    byte[] byteIpTemp = new byte[15];
                    byte[] byteIp = Encoding.ASCII.GetBytes(m_stringIP);
                    Array.Copy(byteIp, byteIpTemp, byteIp.Length);
                    //让时间固定为最大8位
                    byte[] byteNowTemp = new byte[8];
                    byte[] byteNow = Encoding.ASCII.GetBytes(m_stringNow);
                    Array.Copy(byteNow, byteNowTemp, byteNow.Length);

                    //在包中加入15IP位 + 8位时间 + 16位标识位 每4位一组
                    byte[] data = new byte[15 + 8 + 16 + m_intLength];

                    int place = 0;
                    Buffer.BlockCopy(byteIpTemp, 0, data, place, 15); //IP(最大15位)
                    place += 15;
                    Buffer.BlockCopy(byteNowTemp, 0, data, place, 8); //时间
                    place += 8;
                    Buffer.BlockCopy(BitConverter.GetBytes(m_intSerial), 0, data, place, 4); //顺序戳   
                    place += 4;
                    Buffer.BlockCopy(BitConverter.GetBytes(m_intBlocks), 0, data, place, 4); //数据总块数   
                    place += 4;
                    Buffer.BlockCopy(BitConverter.GetBytes(m_intLength), 0, data, place, 4); //数据长度   
                    place += 4;
                    Buffer.BlockCopy(BitConverter.GetBytes(BTmp.Length), 0, data, place, 4); //数据总长度   
                    place += 4;
                    Array.Copy(BTmp, m_intSerial * m_intBlockLength, data, 15 + 8 + 16, m_intLength); //复制数据   

                    //http://hi.baidu.com/dxawddd/blog/item/ac073636278e9c350b55a92f.html
                    //http://hi.baidu.com/dxawddd/blog/item/a9e9131b543bf4d1ac6e75a8.html
                    //队列的标签,在发送多条不同的队列时可用之鉴别;
                    msg.Label = m_intSerial.ToString();
                    //队列的主体内容;
                    //msg.Body = data;
                    msg.Body = m_stringIP;
                    msg.Formatter = new System.Messaging.XmlMessageFormatter(new Type[] { typeof(string) });
                    //执行发送;
                    msgQueue.Send(msg);

                    m_intSerial = m_intSerial + 1;//0,1,2...
                    m_intMessageLength = m_intMessageLength - m_intLength;//发送信息还剩下的数据长度(总长度-已经发送的长度 1000+16)
                }
                catch (System.Exception pe)
                {
                    MessageBoxEx.Show(pe.ToString());
                }
            }
             * */
            #endregion
        }
        #endregion

        /// <summary>拼接 用户名+IP</summary>
        private string userInfoSplice(DataInfo tempGetInfo)
        {
            string hostName = Encoding.UTF8.GetString(tempGetInfo.FromMachineName);
            string hostIp = tempGetInfo.FromMachineIp;
            StringBuilder returnValue = new StringBuilder();
            if (!(string.Empty.Equals(hostName) || string.Empty.Equals(hostIp)))
            {
                returnValue.Append(hostName);
                returnValue.Append("(");
                returnValue.Append(hostIp);
                returnValue.Append(")");
            }

            return returnValue.ToString();
        }

        /// <summary>分解 用户名+IP</summary>
        private DataInfo userInfoSeparate(string tempAllStr)
        {
            //分解 取得 Ip 和 主机名
            string[] ipGroup = tempAllStr.ToString().Split('(');
            string ip = ipGroup[1].Substring(0, ipGroup[1].Length - 1);
            string host = ipGroup[0];

            DataInfo getInfo = new DataInfo();
            getInfo.FromMachineIp = ip;
            getInfo.FromMachineName = Encoding.UTF8.GetBytes(host);

            return getInfo;
        }

        /// <summary>发送消息</summary>
        private void sendMsg_Click(object sender, EventArgs e)
        {
            //判断发送内容是否为空 暂时没有好的办法
            //先判断有没有图片文件 有图片文件时候 检查.Text属性是否为空
            int count = writeTextBox.Rtf.IndexOf(@"\pict\");
            if ((count < 0) && (writeTextBox.Text.Trim().Length == 0))
            {
                MessageBoxEx.Show(this, "请填写信息！", "信息提示");
                writeTextBox.Focus();
                writeTextBox.Text = string.Empty;
                return;
            }

            try
            {
                //初始化计算机名和端口
                IPHostEntry myEntry = Dns.GetHostEntry(Dns.GetHostName());
                IPAddress myAddress = new IPAddress(myEntry.AddressList[0].Address);

                IPAddress groupAddress = IPAddress.Parse(getInfo.FromMachineIp); //发送地址
                //IPAddress groupAddress = IPAddress.Parse("255.255.255.255"); //发送地址
                IPEndPoint End2 = new IPEndPoint(groupAddress, 2525);
                //string getText = this.writeTextBox.Text.Trim();
                string getText = this.writeTextBox.Rtf;

                this.writeTextBox.Text = string.Empty;
                this.writeTextBox.Focus();
                sendInfo.CommandFlag = COMMAND_FLAG_CHAT;
                sendInfo.FromMachineIp = myAddress.ToString();
                sendInfo.FromMachineName = Encoding.UTF8.GetBytes(Dns.GetHostName());
                sendInfo.ToMachineIp = getInfo.FromMachineIp;
                //sendInfo.Message = Encoding.UTF8.GetBytes(getText);
                sendInfo.Message = Encoding.UTF8.GetBytes(getText);
                sendInfo.Time = DateTime.Now.ToShortDateString() + " " + DateTime.Now.ToLongTimeString();
                sendInfo.SubFormName = Encoding.UTF8.GetBytes(this.Text);

                subFormSendDataThread = new Thread(new ThreadStart(this.sendPack));
                subFormSendDataThread.Start();
                //sendPack(sendInfo);
                
                if (!sendInfo.FromMachineIp.Equals(sendInfo.ToMachineIp))
                {
                    //把自己发送的信息显示在文本框
                    setMessage(sendInfo);
                }
            }
            catch
            {
                MessageBoxEx.Show("所选用户已经下线，请更新用户列表。");
                writeTextBox.Focus();
            }
        }

        /// <summary>Ctrl + Enter　快捷键</summary>
        private void writeTextBox_KeyDown(object sender, KeyEventArgs e)
        {
            /*
            //Ctrl + Enter = 发送
            if (e.Control && e.KeyCode == Keys.Enter)
            {
                e.Handled = true;//将Handled设置为true，指示已经处理过KeyPress事件
                sendMsg.PerformClick();
            }*/
        }

        /// <summary>显示自己的发言</summary>
        private void setMessage(DataInfo sendInfo)
        {
            Chat_Main chatMain = new Chat_Main();
            string fromMachineName = Encoding.UTF8.GetString(sendInfo.FromMachineName);
            string receiveMessage = Encoding.UTF8.GetString(sendInfo.Message);

            //string getOldMsg = this.displayTexBox.Rtf;
            ////处理好准备 加入新消息
            //getOldMsg = getOldMsg.Substring(0, getOldMsg.LastIndexOf(@"\par"));

            string header = fromMachineName + " " + sendInfo.Time;
            chatMain.SetMessage(header, receiveMessage, Color.Red, displayTexBox);

            //滚动条在下面
            displayTexBox.SelectionStart = displayTexBox.Text.Length;
            displayTexBox.SelectionLength = 0;
            displayTexBox.ScrollToCaret();
        }

        /// <summary>关闭子窗体</summary>
        private void closeFrom_Click(object sender, EventArgs e)
        {
            this.Close();
        }

        /// <summary>在显示窗口输入时 直接转到输入窗口</summary>
        private void displayTexBox_KeyPress(object sender, KeyPressEventArgs e)
        {
            writeTextBox.Text += e.KeyChar.ToString();
            writeTextBox.Select(writeTextBox.Text.Length, 0);
            writeTextBox.Focus();
        }

        /// <summary>Ctrl + Enter　快捷键(并且去掉Enter的空行)</summary>
        protected override bool ProcessDialogKey(Keys keyData)
        {
            if (((keyData & Keys.Control) == Keys.Control))
            {
                Keys keys1 = keyData & Keys.KeyCode;
                if (keys1 == Keys.Return)
                {
                    sendMsg.PerformClick();
                    return true;
                }
            }
            return base.ProcessDialogKey(keyData);
        }

        private void displayTexBox_LinkClicked(object sender, LinkClickedEventArgs e)
        {
            System.Diagnostics.Process.Start(e.LinkText);
        }

        /// <summary>拖拽</summary>
        private void writeTextBox_DragDrop(DragEventArgs e)
        {
            try
            {
                Array fileList = (System.Array)e.Data.GetData(DataFormats.FileDrop);
                foreach (string str in fileList)
                {
                    // If file is an icon
                    if (str.ToUpper().EndsWith(".ICO"))
                    {
                        // Create a new icon, get it's handle, and create a bitmap from
                        // its handle
                        writeTextBox.InsertImage(Bitmap.FromHicon((new Icon(str)).Handle));
                    }
                    else if (str.ToUpper().EndsWith(".ICO")
                        //|| str.ToUpper().EndsWith(".BMP")
                        || str.ToUpper().EndsWith(".GIF")
                        || str.ToUpper().EndsWith(".JPEG")
                        || str.ToUpper().EndsWith(".JPG")
                    )
                    {
                        // Create a bitmap from the filename
                        writeTextBox.InsertImage(Image.FromFile(str));
                    }
                    else
                    {
                        MessageBoxEx.Show(this, "目前只支持.bmp;.ico;.gif;.jpeg;.jpg\n的图片文件传送。", "信息提示");
                    }
                }
            }
            catch (Exception _e)
            {
                MessageBoxEx.Show(this, "The file could not be opened:\n\n" + _e.Message, "File Open Error");
            }
        }

        private void writeTextBox_DragEnter(object sender, DragEventArgs e)
        {
            if (e.Data.GetDataPresent(DataFormats.FileDrop))
                e.Effect = DragDropEffects.Link;
            else
                e.Effect = DragDropEffects.None;
        }

        /// <summary>重写最小化事件</summary>
        protected override void WndProc(ref System.Windows.Forms.Message m)
        {
            const int WM_SYSCOMMAND = 0x0112;
            const int SC_MINIMIZE = 0xF020;

            if (m.Msg == WM_SYSCOMMAND && ((int)m.WParam == SC_MINIMIZE))
            {
                
                //取得最小化之前的状态 窗体还原时候用
                _minPreState = this.WindowState;
                this.WindowState = FormWindowState.Minimized;
                ////最小化到系统栏
                //this.Hide();
                return;
            }
            base.WndProc(ref m);
        }
    }
}

 

 

在Chat_Dialog.Designer.cs里添加下面两个事件

            this.writeTextBox.DragDrop += new JToolDemo.Tool_Chat.ExRichTextBox.mDrag(this.writeTextBox_DragDrop);
            this.writeTextBox.DragEnter += new System.Windows.Forms.DragEventHandler(this.writeTextBox_DragEnter);