Delphi - Problemon con Sockets

Hola a todos los programadores en Delphi:

La cosa que deseo saber es como puedo enviar archivos con lso componentes TServersocket y TClientsocket. ya he podido establecer comunicacion entre ellos y todo con relacion a los puertos y nombre host, he buscado harto y lo unico que encuentro es como enviar texto, eso y ojala me ayuden, gracias

Tengo un ejemplo pero con los componentes Indy, no con los FastNet, si quieres revisarlo está en www.geocities.com/diegofrom sección Delphi.

Un ejemplo muy claro y sencillo sobre lo que necesitas hacer está en el libro "La Biblia de Delphi 5" de Marco Cantú ("Mastering Delphi 5" es su título original).
Si lo tienes al libro tenes que fijarte en el capítulo de Programación en Internet, sección Programación con Sockets (creo que es el tercer ejemplo de esa sección).

Si no puedes conseguir el libro, la función que debes usar es SendStream en lugar de SendText, y en vez de una cadena debes enviar un dato del tipo TMemoryStream.
No tengo un ejemplo a mano para mostrarte, pero busca en la ayuda esos dos temas y hallarás tu solución.

Suerte!