Sockets-Reconocer una cadena de texto.

[DarkByte]

Añado que utilizo Delphi 7 Enterprise

[__marcsc]

Hola,

no puedes utilizar un tipo no ordinal (como un string) en un case en Delphi. Tendrás que hacerlo con if.

Otra cosa que podrías hacer seria codificar tus mensajes numéricamente en vez de alfanuméricamente para poderlos convertir a un tipo ordinal y poderlos utilizar en un case. Ejemplo:

000 = mensaje
001 = datos de ingreso
002 = nick

Saludos.

[DarkByte]

Vale, muchas gracias. Por cierto ¿cómo sería con el ejemplo de Descendents?, es que me resulta más fácil usar ese.

[DarkByte]

¿Estaría bien entonces...

Código Delphi [-]
  r := copy(s, 1, 4)
  if r = 'MNSG'  then
    begin
      Delete(s,1,4);
      ShowMessage (s);
    end;

?

[DarkByte]

Mejor no sy bago y lo pruebo

[DarkByte]

Funciona xD Gracias a todos