Leer mensajes de modem(Celular) GSM desde PC

[luis_sencion]

Hola a todos, he puesto este hilo en esta categoria porque la verdad no sabia a donde debia ir, pero si alguien sabe favor de informarme.

La inquietud que tengo es la siguiente, estoy desarrollando una aplicacion que puede realizar llamada y tambien enviar sms, estoy utilizando un nokia 3110 classic, estas dos funciones estan perfectamente, las tengo realizadas, pero ahora necesito leer los sms que son recibidos al equipo, para realizar todas estas operaciones he utilizado comandos at.

Segun he encontrado en los comandos at, hay una instruccion que es para los mensajes AT+CMGR o AT+CMGL pero al momento de invocarlo este me devuerve texto de ERROR, y he tratado todos los pasos que me han sugerido algunas pagina, pero aun no he dado con esto.

Antes de invocar los metodos mencionados, primero configuro el equipo con AT+CMGF=1, pero por lo que he entendido esto es para el envio de los sms en formato de texto, la verdad es que necesito la ayuda en leer los SMS, es solamente lo que estoy solicitando si es posible.

Gracias de atemano.

[arvaq]

Código Delphi [-]
procedure Tfmenu.bleerClick(Sender: TObject);
begin
  at := 'AT+CMGF=1' + #13#10;   {SMS en formato texto}
  ComPort.WriteStr(at);
  Sleep(100);
  
   at := 'AT+CMGL="REC READ"'+ #13#10; (CON ESTE COMANDO NO PUEDO LEER LOS MENSAJES. ME DICE OK SOLAMENTE NO DE POR QUE)

  at := 'AT+CMGR=1' + #13; (Con este si los puedo leer. AT+CMGR= Indice del mensaje a leer, ej 1, 2, 3, 10. Pone o CMGR o CMGL fijate cual te anda y te sirve).

  ComPort.WriteStr(at);
  Sleep(100);
end;

//en el componente comport.

Código Delphi [-]
procedure Tfmenu.ComPortRxChar(Sender: TObject; Count: Integer);
var
  Str: String;
begin
  ComPort.ReadStr(Str, Count);
  Memo.Text := Memo.Text + Str;
  leersms(str);
end;

[arvaq]

si alguien sabe alguna manera de poder leer solamente los sms no leidos avise. yo no pude.. si envio AT+CMGl="REC UNREAD" me devuelve OK solamente... y si lo igualo a "REC READ" tambien... en ningun caso me da todos los sms no leidos o leidos.. solamente los puedo ver con el CMGR pero hay que ir de uno en uno.

[Casimiro Notevi]

Recuerda poner el código entre entiquetas para que se lea mejor, ejemplo:




.

[jhonson01]

Hola a todos... yo tengo el mismo problema... pruebo con el CMGL y CMGR y con los dos me muestra "OK".... como hago para tomar solo el mensaje que recibo?

[Casimiro Notevi]

Bienvenido a clubdelphi, ¿ya leiste nuestra guía de estilo?, gracias por tu colaboración