enviar un mensaje de texto de un pc a otro. (con pcs en diferentes localizaciones)

[cocute]

Hola cual creeis que sería el mejor modo de enviar un mensaje de texto de un pc a otro desde una app delphi,
he probado con un cliente/servideor TCP y va bien:
http://www.delphibasics.info/home/de...etschatexample
pero claro está el inconveniente de que hay que poner la ip del servidor y tener el puerto abierto en el router del servidor y puede ser un poco de lio para el que lo use.
O puedo poner algún puerto que no haga falta abrirlo?
Es que pruebo conectandome en el mismo pc con los dos programas cliente/servidor poniendo mi ip de internet en el cliente pero si no abro puerto no va.

Otra cosa se me ocurre es crear un cliente de correo eléctrónico y enviar por email el mensaje. No se si esto sería mejor.

gracias