Estoy tratando de transferir un archivo a través de una conexión por socket.
Programo una "Console Application" por lo que no puedo recurrir a los componentes sockets que trae Delphi, así que uso una Librería WinSock que funciona casi igual que los TServerSocket y TClientSocket.
El problema surge cuando quiero enviar un archivo usando un código similar a este:
Código:
ClientSocket2.Socket.SendStream (TFileStream.Create (strFile, fmOpenRead or fmShareDenyWrite));
Esto funciona en los componentes sockets que trae Delphi, pero en el caso de la librería que uso me da el siguiente error al compilar:
"Incompatible types: 'TStream' and 'TFileStream'"
La primera solución que se me ocurre es (si se puede) transformar el TFileStream a TStream. ¿Cómo lo hago?
La segunda solución podría ser enviar el archivo de otra manera ¿SendBuffer serviría?
Gracias de antemano
29-06-2004
Modo Hilado