Связь через сокеты программ написанных на delphi и C#

 public partial class Form1 : Form
    {
 
        private bool client_running;
        // Сокет клиента
        private Socket client;
        // Адрес сервера
        private IPAddress ip = IPAddress.Parse("192.168.100.125");
        // Порт, по которому будем присоединяться
        private int port = 3641;
        // Список потоков
        private List<Thread> threads = new List<Thread>();
        public string st;
        public Form1()
        {
            InitializeComponent();
            Connect();
            
          
            
        }
        private void timer1_Tick(object sender, EventArgs e)
        {
            Receiver();
            label5.Text = DateTime.Now.ToString();
        }
        void Connect()
        {
            try
            {
 
                client_running = true;
                client = new Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp);
                client.Connect(ip, port);
                timer1.Enabled = true;
                label1.Text = "OK";
                
            }
            catch { label1.Text = "error"; }
        }
 
         void Receiver()
        {
            Thread th = new Thread(delegate()
            {
                  try
                    {
                        byte[] bytes = new byte[1024];
                            client.Receive(bytes);
                            string data = Encoding.UTF8.GetString(bytes);
                            label2.Text = data;
                            label3.Text = "OK";
                        
                    }
                    catch {  }
               
            });
            th.Start();
            threads.Add(th);
        }

   client_running = true;
                client = new Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp);
                client.Connect(ip, port);
                timer1.Enabled = true;
                label1.Text = "OK";

try
                    {
                        byte[] bytes = new byte[1024];
                            client.Receive(bytes);
                            string data = Encoding.UTF8.GetString(bytes);
                            label2.Text = data;
                            label3.Text = "OK";
                        
                    }

  byte[] bytes = new byte[1002];
                        client.Receive(bytes);
                        if (bytes.Length != 0)
                        {
                         //label6.Text = "Кое что есть!";
                           StreamWriter sw = new StreamWriter("file.txt");
                           sw.WriteLine(bytes);
                           sw.Close();
                           // label2.Text = Encoding.Unicode.GetString(bytes); 
                           // label3.Text = "OK";
                        }

  File.WriteAllBytes("file.txt", bytes);