Ver Mensaje Individual
  #1  
Antiguo 30-04-2011
emula emula is offline
Registrado
 
Registrado: feb 2009
Posts: 8
Reputación: 0
emula Va por buen camino
Control + Z en ComPort

Saludos Gente...
Estoy tratando de usar el componente ComPort para la comunicación con un modem GSM.

Estoy en el proceso de envio de SMS a traves de una visual memo y el edit como introductor de comando.
El problema es a la hora de mandara traves de un boton la combinación Ctrol + Z que me permitira el envio del sms.

Este es el código q funciona hasta el momento de enviar el comando #26 que es el ascii de Ctrol+Z... Que estoy haciendo mal?
Código Delphi [-]
var
  Str: String;
begin

/////Introducción al sistema sms////
  Str := 'AT+CMGS='+'XXXXXXXXX'+ #13#10;
  ComPort.WriteStr(Str);

/////Texto a enviar////
  Str := Edit1.text;
  ComPort.WriteStr(Str);  

/////Envio de la combinación Ctrol + z en Ascii////
  Str := #26;
  ComPort.WriteStr(Str);

End;

Última edición por ecfisa fecha: 30-04-2011 a las 04:25:20. Razón: Etiquetas [DELPHI] y [/DELPHI]
Responder Con Cita