Sobre el uso de TServerSocket y TClientSocket para conexiones TCP/IP

[[escafandra]]

Esos componentes lo he usado sin problemas. Si en la documentación aparecen como obsoletos es porque usas la versión Socket 1.1 que está superada. Yo he usado esos componentes en comunicación con WinSock 2.2 en otros ejecutables que sólo usan la API (sin componentes) y funcionan bien.

Ahora que mencionas el tema se me ocurre, pues no lo he probado, actualizar el código fuente de una forma muy sencilla que en principio consistiría en cambiar una instrucción de los constructores:

Código Delphi [-]
WSAStartup($0101, WSAData);

por

Código Delphi [-]
WSAStartup(MakeWord(2, 2), WSAData);

En concreto sería cambiarlo en el procedimiento Startup de ScktComp.pas:

Código Delphi [-]
procedure Startup;
var
  ErrorCode: Integer;
begin
  ErrorCode := WSAStartup(MakeWord(2, 2), WSAData); //WSAStartup($0101, WSAData);
  if ErrorCode <> 0 then
    raise ESocketError.CreateResFmt(@sWindowsSocketError,
      [SysErrorMessage(ErrorCode), ErrorCode, 'WSAStartup']);
end;

Habría que revisar muchas mas cosas, pero para empezar...

Así que, si te animas, realiza el cambio y recompila los componentes; prueba y me cuentas...


Saludos.

[dec]

Hola,

¡Muchas gracias por responder tan rápido además! La verdad es que no me he resistido y he estado haciendo pruebas y hasta adelantando el proyecto de que he hablado, todo sin problemas, a falta de probar realmente el servidor y el cliente, esto es, desde otro ordenador diferente al mío. Yo creo que voy a terminar usando estos componentes por varias razones, algunas de ellas ya mencionadas arriba, pero, me alegra experiencia, que aporta un poco de luz al tema.

Y hablando de tu experiencia y tu propuesta. En efecto, el procedimiento "Startup" es tal como dices, tanto en Delphi 2007 como en Delphi XE2. Ahora bien, se me ocurren dos cosas. En primer lugar, ¿es posible modificar dicho código sin más? Al fin y al cabo está bajo copyright the Embarcadero. Pero, además, ¿realmente haría falta? Me explico. ¿No se usará la última versión de Winsock, incluso si se especifica que no sea así? ¿Entonces porqué funcionan tan bien? ¿Y en Windows 7 nada menos? ¿No puede ser la versión 1 aquí una especie de "wrapper" que termine usando la nueva versión?

En fin. Gracias de nuevo por contestar. Y que se anime quien quiera a comentar cualquier otra cosa: todas ellas serán bienvenidas.

[dec]

Hola de nuevo,

Entre otras cosas, en la documentación que enlacé en mi anterior mensaje, puede leerse esto:

The current version of the Windows Sockets specification is version 2.2. The current Winsock DLL, Ws2_32.dll, supports applications that request any of the following versions of Windows Sockets specification:

1.0
1.1
2.0
2.1
2.2

Aunque mi inglés es pésimo, yo entiendo que, aunque tú solicites usar la versión 1.1, por ejemplo, lo que en realidad ocurre, si existe una versión superior, es que se usará esta versión superior, pues soporta la "interfaz" de la versión anterior. Y ahí es donde digo que pueden haberse solucionado los problemas que menciona el compañero más arriba, en el sentido de que dichos problemas acaso se dieran sólo en la versión 1.1 (por ejemplo), pero, esta sólo se usará donde no se disponga de otra cosa, y eso será raro, pues, desde Windows 95, parece ser, se incluye la versión 2.2... ¿estoy equivocado o esto puede ser más o menos así?

[[escafandra]]

Yo lo que entiendo es que es compatibles hacia atrás...

WinSock 2.2 añade mas funcionalidades y funciones pero quizás para tu propósito no sea necesario: Windows Sockets 2


Saludos.

[dec]

Hola,

Eso digo, escafandra, que, aunque yo "cargue" la versión 1.0, terminará usándose la versión que esté instalada (la 2.2 es la última y será la probablemente instalada), siendo que, los posibles problemas detectados en la versión 1.0, no afectarán al programa, pues al final se acabará usando la versión 2.2 de WinSock. El caso es que, con sus limitaciones (de momento sin texto Unicode y hasta sin enviar archivos) me parecen dos componentes excelentes por su buen resultado y hasta diría que eficacia.

Lo digo teniendo en cuenta los problemas que he encontrado cuando he tratado de usar otros componentes (que no han sido pocos), aunque, para decir toda la verdad, no pocos de estos problemas, seguramente, puedan achacárseme a mí. En este caso, me limitaré a decir que estos componentes me parecen realmente sencillos de usar (los puedo usar hasta yo) y prácticos, a mi parecer, siempre que se necesite conectar clientes con servidores y viceversa. ¿Eh?

[[escafandra]]

Bueno. con los sockets puedes enviar y recibir cualquier cosa, no sólo texto. Puedes hacerte funciones para enviar y recibir ficheros, pero si te apetece algo hecho puedes usar la API TransmitFile


Saludos.

[dec]

Empezado por escafandra

Bueno. con los sockets puedes enviar y recibir cualquier cosa, no sólo texto. Puedes hacerte funciones para enviar y recibir ficheros, pero si te apetece algo hecho puedes usar la API TransmitFile


Saludos.

Echaré un vistazo. Muchas gracias otra vez escafandra, de veras me has dado el empujón que me faltaba para confiar en estos componentes.