Ver Mensaje Individual
  #7  
Antiguo 19-02-2007
[egostar] egostar is offline
Registrado
 
Registrado: feb 2006
Posts: 6.562
Reputación: 25
egostar Va camino a la fama
Siguiendo con el asunto del Apro, la forma mas fácil de recibir paquetes es usando el componente ApdDataPacket, solo requieres conocer el inicio de la cadena y el final de la cadena o al menos uno de ellos.

En protocolos normales se inicia con STX (02h) y termina con ETX (03h), algunos protocolos no tienen un caracter fijo de inicio pero si tienen LF+CR (10h,13h).

Con este componente te olvidas de buscar dentro de los caracteres recibidos el paquete que deseas.

Aqui un ejemplo:

Código Delphi [-]
procedure TLector.ApdDataPacket1StringPacket(Sender: TObject;
  Data: String);
begin
  Linea := Data;
  If (Linea[5] = 'A') then begin
     ProcesaInformacion('A');
  end;
end;

Saludos.

Edito: Por cierto, este componente APro me lo recomendó Al Gonzalez hace mucho tiempo, gracias Al me ha servido increiblemente.
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney

Última edición por egostar fecha: 19-02-2007 a las 19:57:08.
Responder Con Cita