¿Cómo enviar un archivo con TServerSocket/TClientSocket y viceversa?

[K04VH4CK]

Buenas gente de CLUB DELPHI, tengo un problema al enviar un archivo desde un ServerSocket a un ClientSocket y viceversa.
Vi en varios hilos posibles soluciones, pero ninguna cesó mi problema...
El archivo que trató de enviar es un archivo JPG u otro tipo como RAR, ZIP, ETC. De cualquier peso cada archivo... pueden varias desde los KB, hasta los MB...
Pido un código sencillo y limpio...

Gracias de antemano 😀😀😀...

[[ElKurgan]]

¿Y no te sirve ningún enlace de los que aparecen al final de la página?

Saludos

[Neftali [Germán.Estévez]]

Empezado por K04VH4CK

El archivo que trató de enviar es un archivo JPG u otro tipo como RAR, ZIP, ETC. De cualquier peso cada archivo... pueden varias desde los KB, hasta los MB...
Pido un código sencillo y limpio...

Estaría bien saber qué código has utilizado y saber qué problemas te ha dado.
Sin saber eso seguir enviando códigos es inútil.

[K04VH4CK]

Pues... al momento de guardar el archivo enviado... ya sea jpg, bmp, o lo que sea...
El fichero temporal, tiene un peso de 0 kb y cuando intentó utilizarlo, me da error de que ya está en uso.
Otro sería que sólo puede enviar sólo un fichero por programa... es decir, que debo cerrar el programa (client/server) para que pueda darle solución al primer problema, y para poder enviar de nuevo otro archivo...
pero igual me lleva a los mismos problemas...

[Neftali [Germán.Estévez]]

En este caso te diría lo mismo que les decimos a nuestros clientes cuando tienen un problema así.
Haz un ejemplo mínimo (IMPORTANTE) que reproduzca el error y nos lo envías, porque sino es IMPOSIBLE saber qué está pasando.