Código Delphi [-]s := txtSend.Text + Chr(1); edit1.Text := s;
s := txtSend.Text + Chr(1); edit1.Text := s;