como enviar un sms con Delphi con zenvia


Zenvia es la empresa líder en movilidad corporativa de Brasil y ofrece a sus clientes la posibilidad de gestionar los envíos SMS desde aplicaciones externas. El método que presento es la forma de gestionar esos envíos desde una aplicación realizada en Delphi.






Ajuste el envío





Primer paso


Haga la  descarga de la biblioteca de integración  en ella se encuentran los  
siguientes archivos:. HumanApiClient 
   Indy _9_00_17_ src. Zip.





Paso 2


Añadir a la  ruta de búsqueda  de  Delphi  el directorio donde están las fuentes del paquete


Indy  y el paquete  HumanClient.





Paso 3


Para cualquier operación de  acceso a enviar  SMS, es necesario identificarse con su


cuenta y código de acceso. Vamos a trabajar con instancias de clases TSimpleSending   TMultipleSending  para el manejo de  SMS  (envío y consulta) 


a través de sus parámetros del constructor de su cuenta y código de acceso.  
Estos datos son transferidos por 
 Zenvia  junto con la negociación del contrato  
firmado con la empresa.





Ejemplo:





sms: = TMultipleSending.create ('Cuenta', 'contraseña');


Envío de  SMS  de forma individual


Primer paso


Utilizar una instancia de la clase  TSimpleSending con su cuenta y contraseña.


Ejemplo:





var


    ret: string;


    sms: TSimpleSending;


comenzar  


    sms: = TSimpleSending.create ('Cuenta', 'contraseña');








Paso 2


Agregue la información de  Para  (requerido)  Mensaje  (requerido)  De  (opcional), Id  (opcional) Horario  (opcional) y devolución de llamada  (opcional)
 


Ejemplo:





sms.From: = 'YourCo';


sms.ToNumber: = 'NumeroDeDestino';


sms.Msg: = 'SuaMensagem';











Paso 3


Llame al método  TSimpleSending.send



Ejemplo:





ret: sms.send = ();





Paso 4



El método de envío de retorno es una  cadena;el  texto que se puede ver en el código y la descripción de la solicitud y el estado 
 de SMS  enviados.


Ejemplo:





StatusBar1.Panels [0] .Text: = ret;    








Envío múltiple  de SMS


Primer paso


Instancia de la clase  TMultipleSending con su cuenta y contraseña.


Ejemplo:





var


    ret: TStrings;


    sms: TMultipleSending;


    Fecha: string;


    typeLayout: string;


comenzar


    sms: = TMultipleSending.create ('Cuenta', 'contraseña');


   


Paso 2





Llame al método  TMultipleSending.LoadList, para llenar una  cadena 
con la lista de  SMS  para ser enviados y el  tipo de diseño de la lista.
En nuestro ejemplo, vamos a elegir la 
 disposición  A, que consiste en
 
"numeroDeTelefone; textoDaMensagem".





Ejemplo:





fecha: = '555199990101; testen555199990102 mensaje; Mensaje de prueba ";


typeLayout: = 'A';


sms.LoadList (fecha, typeLayout);








Paso 3


Llame al método  TMultipleSending.send, a través de clases de parámetros ListResource.


Ejemplo:





ret: sms.send = ();








Paso 4


El método de envío de retorno es un  TStrings; texto que se puede incluir en el código junto con la descripción de la solicitud y el estado del  SMS  enviado a través  de devolución de llamada.


Ejemplo:





ShowMessage (ret.Text);


Fuente: 
programadordelphiatual.blogspot.com.es



Obtener parametros de los paneles solares

Programa que calcula partiendo de los siguientes datos: (se obtienen de la hoja de características del fabricante de los módulos fotovoltaic...