Tema: Sockets-Reconocer una cadena de texto.
Ver Mensaje Individual
  #13  
Antiguo 14-06-2004
Avatar de DarkByte
DarkByte DarkByte is offline
Miembro
  
Registrado: sep 2003
Ubicación: Desconocido
Posts: 1.322
Reputación: 22
DarkByte Va por buen camino
¿Estaría bien entonces...
Código Delphi [-]
  r := copy(s, 1, 4)
  if r = 'MNSG'  then
    begin
      Delete(s,1,4);
      ShowMessage (s);
    end;
?
Responder Con Cita