Потоки и сети

#pragma once
 
namespace windowsformsapplication {
 
    using namespace System;
    using namespace System::ComponentModel;
    using namespace System::Collections;
    using namespace System::Windows::Forms;
    using namespace System::Data;
    using namespace System::Drawing;
    using namespace System::Text;
using namespace System::IO;
using namespace System::Net;
using namespace System::Net::Sockets;
using namespace System::Collections;
using namespace System::Threading;
 
 
 
    /// <summary>
    /// Summary for Form1
    /// </summary>
    public ref class Form1 : public System::Windows::Forms::Form
    {
    public:
 
        //static ManualResetEvent^ allDone = gcnew ManualResetEvent( false );
        Socket^ peredachsok;
        Form1(void)
        {
            InitializeComponent();
            //
            //TODO: Add the constructor code here
            //
        }
 
    protected:
        /// <summary>
        /// Clean up any resources being used.
        /// </summary>
        ~Form1()
        {
            if (components)
            {
                delete components;
            }
        }
    private: System::Windows::Forms::Button^  button1;
    protected: 
    private: System::Windows::Forms::Button^  button2;
    private: System::Windows::Forms::Label^  label1;
    private: System::Windows::Forms::TextBox^  textBox1;
    private: System::Windows::Forms::Button^  button3;
    private: System::Windows::Forms::TextBox^  textBox2;
    private: System::Windows::Forms::TextBox^  textBox3;
    private: System::Windows::Forms::TextBox^  textBox4;
 
    private:
        /// <summary>
        /// Required designer variable.
        /// </summary>
        System::ComponentModel::Container ^components;
 
#pragma region Windows Form Designer generated code
        /// <summary>
        /// Required method for Designer support - do not modify
        /// the contents of this method with the code editor.
        /// </summary>
        void InitializeComponent(void)
        {
            this->button1 = (gcnew System::Windows::Forms::Button());
            this->button2 = (gcnew System::Windows::Forms::Button());
            this->label1 = (gcnew System::Windows::Forms::Label());
            this->textBox1 = (gcnew System::Windows::Forms::TextBox());
            this->button3 = (gcnew System::Windows::Forms::Button());
            this->textBox2 = (gcnew System::Windows::Forms::TextBox());
            this->textBox3 = (gcnew System::Windows::Forms::TextBox());
            this->textBox4 = (gcnew System::Windows::Forms::TextBox());
            this->SuspendLayout();
            // 
            // button1
            // 
            this->button1->Location = System::Drawing::Point(12, 195);
            this->button1->Name = L"button1";
            this->button1->Size = System::Drawing::Size(105, 23);
            this->button1->TabIndex = 0;
            this->button1->Text = L"Создать сервер";
            this->button1->UseVisualStyleBackColor = true;
            this->button1->Click += gcnew System::EventHandler(this, &Form1::button1_Click);
            // 
            // button2
            // 
            this->button2->Location = System::Drawing::Point(189, 195);
            this->button2->Name = L"button2";
            this->button2->Size = System::Drawing::Size(83, 23);
            this->button2->TabIndex = 1;
            this->button2->Text = L"Подрубиться";
            this->button2->UseVisualStyleBackColor = true;
            this->button2->Click += gcnew System::EventHandler(this, &Form1::button2_Click);
            // 
            // label1
            // 
            this->label1->AutoSize = true;
            this->label1->Location = System::Drawing::Point(12, 65);
            this->label1->Name = L"label1";
            this->label1->Size = System::Drawing::Size(35, 13);
            this->label1->TabIndex = 2;
            this->label1->Text = L"label1";
            // 
            // textBox1
            // 
            this->textBox1->Location = System::Drawing::Point(12, 13);
            this->textBox1->Name = L"textBox1";
            this->textBox1->Size = System::Drawing::Size(182, 20);
            this->textBox1->TabIndex = 3;
            // 
            // button3
            // 
            this->button3->Location = System::Drawing::Point(200, 10);
            this->button3->Name = L"button3";
            this->button3->Size = System::Drawing::Size(75, 23);
            this->button3->TabIndex = 4;
            this->button3->Text = L"Отправить";
            this->button3->UseVisualStyleBackColor = true;
            this->button3->Click += gcnew System::EventHandler(this, &Form1::button3_Click);
            // 
            // textBox2
            // 
            this->textBox2->Location = System::Drawing::Point(12, 119);
            this->textBox2->Name = L"textBox2";
            this->textBox2->Size = System::Drawing::Size(131, 20);
            this->textBox2->TabIndex = 5;
            // 
            // textBox3
            // 
            this->textBox3->Location = System::Drawing::Point(160, 119);
            this->textBox3->Name = L"textBox3";
            this->textBox3->Size = System::Drawing::Size(50, 20);
            this->textBox3->TabIndex = 6;
            this->textBox3->Text = L"80";
            // 
            // textBox4
            // 
            this->textBox4->Location = System::Drawing::Point(138, 57);
            this->textBox4->Name = L"textBox4";
            this->textBox4->Size = System::Drawing::Size(100, 20);
            this->textBox4->TabIndex = 7;
            // 
            // Form1
            // 
            this->AutoScaleDimensions = System::Drawing::SizeF(6, 13);
            this->AutoScaleMode = System::Windows::Forms::AutoScaleMode::Font;
            this->ClientSize = System::Drawing::Size(284, 262);
            this->Controls->Add(this->textBox4);
            this->Controls->Add(this->textBox3);
            this->Controls->Add(this->textBox2);
            this->Controls->Add(this->button3);
            this->Controls->Add(this->textBox1);
            this->Controls->Add(this->label1);
            this->Controls->Add(this->button2);
            this->Controls->Add(this->button1);
            this->Name = L"Form1";
            this->Text = L"Form1";
            this->ResumeLayout(false);
            this->PerformLayout();
 
        }
#pragma endregion
        
    private: System::Void button1_Click(System::Object^  sender, System::EventArgs^  e) 
             
             {
                
 
                /* // создание сркета
                 Socket^ listenSocket = gcnew Socket( AddressFamily::InterNetwork,
                     SocketType::Stream,
                     ProtocolType::Tcp );
 
                // привязки сокета к порту
                    
                 String^ ip=textBox2->Text;
                  IPAddress^ ipAddress =  IPAddress::Parse("127.0.0.1");
                 if(ip!="")
                 {
                     ipAddress =  IPAddress::Parse(ip);
                 }
                 
                IPEndPoint^ ep = gcnew IPEndPoint(ipAddress, 80);
                 
                    listenSocket->Bind( ep );
 
                // start listening старт отслеживания
                    listenSocket->Listen( 1000);
 
 
                    Socket^ mySocket = listenSocket->Accept();
                    peredachsok=mySocket;
                    label1->Text="что то есть";
                    //poluch();
                    array<Object^>^ ss={label1,mySocket};
                    
 
 
 
                    Thread^ obmen= gcnew Thread( gcnew ParameterizedThreadStart(windowsformsapplication::Form1::poluch));
                   obmen->Start(ss);*/
 
                    /*Object^ dm=ss;     не нужно
                    array<Object^>^ rr=(array<Object^>^)dm;*/
 
                 array<Object^>^ mas={textBox2,textBox3,textBox4};//label1};
                
                 Thread^ ser= gcnew Thread( gcnew ParameterizedThreadStart(windowsformsapplication::Form1::server));
                 ser->Start(mas);
 
 
            }
 
 
             static System::Void server(Object^ mas)
             {
                 array<Object^>^ vse=(array<Object^>^) mas;
                 TextBox^ textBox2=(TextBox^)vse[0];
                 TextBox^ textBox4=(TextBox^)vse[2];
                 //Label^ labl1=(Label^)vse[2];
                 TextBox^ textBox3=(TextBox^)vse[1];
                 int port=Convert::ToInt16(textBox3->Text);
                 //Socket^ peredachsok=(Socket^)vse[2];
                  // создание сркета
                 textBox4->Text="fdsf";///////////////в этом месте программа вылетает
                 Socket^ listenSocket = gcnew Socket( AddressFamily::InterNetwork,
                     SocketType::Stream,
                     ProtocolType::Tcp );
 
                // привязки сокета к порту
                    
                 String^ ip=textBox2->Text;
                  IPAddress^ ipAddress =  IPAddress::Parse("127.0.0.1");
                 if(ip!="")
                 {
                     ipAddress =  IPAddress::Parse(ip);
                 }
                 //Random ch;
                 //ch.Next(80,90);
                IPEndPoint^ ep = gcnew IPEndPoint(ipAddress, port);
                 
                    listenSocket->Bind( ep );
 
                // start listening старт отслеживания
                    listenSocket->Listen( 1000);
 
 
                    Socket^ mySocket = listenSocket->Accept();
                    //peredachsok=mySocket;
                    //labl1->Text="что то есть";
                    array<Object^>^ ss={textBox4,mySocket};//ss={labl1,mySocket};
                    
 
                    Thread^ obmen= gcnew Thread( gcnew ParameterizedThreadStart(windowsformsapplication::Form1::poluch));
                   obmen->Start(ss);
             }
 
 
private: System::Void button2_Click(System::Object^  sender, System::EventArgs^  e)
         
         {
             Socket^ s = gcnew Socket( AddressFamily::InterNetwork,SocketType::Stream,ProtocolType::Tcp );
 
             String^ ip=textBox2->Text;
             int port=Convert::ToInt16(textBox3->Text);
                 if(ip!="")
                 {
                    s->Connect( ip, port );
                 }else{
 
 
                   s->Connect( "127.0.0.1", port );
                 }
                   //peredachsok=s;
                   Thread^ obmen= gcnew Thread( gcnew ParameterizedThreadStart(windowsformsapplication::Form1::poluch));
                   array<Object^>^ ss={label1,s};
                   obmen->Start(ss);
                //   poluch();
         }
 
 
private: System::Void button3_Click(System::Object^  sender, System::EventArgs^  e) 
         {
             String^ str=textBox1->Text;
              array<Byte>^ msg = Encoding::UTF8->GetBytes( str );
                array<Byte>^ bytes = gcnew array<Byte>(256);
 
 
                peredachsok->Send( msg );
         }
 
 
 
         static   System::Void poluch(Object^ soket)
         {
             
            array<Object^>^ rr=(array<Object^>^)soket;
 
             Socket^ peredachsok= (Socket^)rr[1];
             Label^ lab1=(Label^)rr[0]; 
             array<Byte>^ bytes = gcnew array<Byte>(256);
             while(true)
             {
              int byteCount = peredachsok->Receive( bytes );
              lab1->Text=Encoding::UTF8->GetString( bytes );
             }
         }
 
 
};
}

label4->Invoke(gcnew Action<String^>(this, &Form1::Zap_lab4), "Сервер ожидает");
Void Zap_lab4(String^ str)
{
    label4->Text=str;
}