SendText arbeitet mit AnsiStrings.
Du musst dir eine Codierung überlegen (z.B. UTF8) die keinen Datenverlust bei der Wandlung nach
Ansi-Strings verursacht und dam beim Empfänger wieder zurückwandeln.
Übrigens wäre es ganz gut wenn man Compilerwarnungen beachtet. Dies solltest du bekommen wenn du eine halbwegs aktuelle Delphi-Version (ab D2009) verwendest.