1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:

method MainForm.serialPort1_DataReceived(sender: System.Object; e: System.IO.Ports.SerialDataReceivedEventArgs);

var
    S: array of Byte;

begin
  array.Resize(var S,SerialPort1.ReadBufferSize);
  SerialPort1.Read(S,0,SerialPort1.BytesToRead);
  RichTextBox1.Text:= RichTextBox1.Text + S.ToString;
  //MessageBox.Show(serialPort1.ReadLine());
 
end;					

1:
2:
3:
4:
5:

method MainForm.Button1_Click(sender: System.Object; e: System.EventArgs);
begin
  serialPort1.Open;
  Ein.BackColor:= BackColor.Red;
end;					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:

        internal void _Port_DataReceived(object sender, System.IO.Ports.SerialDataReceivedEventArgs e)
        {
            string data = null;
            try
            {
                data = _Port.ReadLine();
            }
            catch
            {
                data = _Port.ReadExisting();
            }
            if (!String.IsNullOrEmpty(data))
                HandleData(data);
        }					

1:
2:
3:

  Invoke(method begin
    RichTextBox1.Text:= RichTextBox1.Text + S.ToArray(); 
end);					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:

method MainForm.serialPort1_DataReceived(sender: System.Object; e: System.IO.Ports.SerialDataReceivedEventArgs);

var
    S: array[0..4095] of Byte;

begin
  
  if SerialPort1.BytesToRead > 0 then
    begin
      var Count: Integer := SerialPort1.BytesToRead;
      SerialPort1.Read(S, 0, Count);
      Invoke(method begin
        TextBox1.Text := TextBox1.Text + System.Text.Encoding.UTF7.GetString(S, 0, Count);
        end);
    end;
end;