Je crois qu'il existe dans l'unité StrUtils une fonction ReplaceString ou ReplaceText ou quelque choqe du genre (je l'ai déjà vu mais je n'ai pas une version de Delphi assez récente pour avoir cette fonction) alors il suffit, avant d'envoyer, de faire :
Texte := ReplaceString(Texte, CaractereARemplacer, CaractereCorrect);
Ensuite tu envoie Texte
et après avoir recu tu fais
Texte := ReplaceString(Texte, CaractereCorrect, CaractereARemplacer);
Le plus dur dans un programme c'est de savoir pourquoi il marche ! 