Comment recevoir un SMS en Delphi
La manière la plus simple de recevoir des SMS depuis Delphi est d'utiliser l'API SMS HTTP/Rest intégrée d'Ozeki SMS Gateway. Lorsque vous utilisez cette API, vous enverrez des messages SMS en effectuant une requête HTTP Post vers la passerelle SMS. La requête HTTP Post contiendra un message formaté en JSON. La passerelle SMS enverra ce SMS au téléphone du destinataire, et renverra une réponse HTTP 200 OK à votre requête.
Code Delphi pour recevoir un SMS
L'exemple de code SMS Delphi ci-dessous montre comment vous pouvez envoyer un SMS en utilisant l'API SMS HTTP Rest d'Ozeki SMS Gateway avec l'unité Ozeki.Libs.Rest de Delphi. Cette unité vous est fournie gratuitement, et vous pouvez l'utiliser et la modifier dans n'importe lequel de vos projets.
ReceiveSms.delphi
program ReceiveSms;
{$APPTYPE CONSOLE}
{$R *.res}
uses
System.SysUtils,
Ozeki.Libs.Rest in 'Ozeki.Libs.Rest.pas';
var configuration : Ozeki.Libs.Rest.Configuration;
var api : Ozeki.Libs.Rest.MessageApi;
var result : MessageReceiveResult;
var message : Ozeki.Libs.Rest.Message;
var read : string;
begin
try
configuration := Ozeki.Libs.Rest.Configuration.Create;
configuration.Username := 'http_user';
configuration.Password := 'qwe123';
configuration.ApiUrl := 'http://127.0.0.1:9509/api';
api := Ozeki.Libs.Rest.MessageApi.Create(configuration);
result := api.DownloadIncoming;
Writeln(result.ToString);
for message in result.Messages do
begin
Writeln(message.ToString);
end;
Readln(read);
except
on E: Exception do
Writeln(E.ClassName, ': ', E.Message);
end;
end.
Comment utiliser l'exemple SMS Delphi :
Cet exemple SMS Delphi peut être utilisé dans n'importe quelle application Delphi. Pour l'utiliser, vous devez ajouter l'unité Ozeki.Libs.Rest.pas à votre projet. Après avoir ajouté l'unité, vous devez placer la directive uses Ozeki.Libs.Rest in 'Ozeki.Libs.Rest.pas'; dans la section d'en-tête de votre code source Delphi. Cela vous permettra d'utiliser les classes fournies par l'unité Ozeki.Libs.Rest. Vous pouvez utiliser la classe Message pour créer le SMS. Vous pouvez utiliser la classe MessageApi pour envoyer le SMS à la passerelle SMS. La passerelle SMS transmettra votre message au réseau mobile soit via une connexion sans fil, soit via Internet.
Télécharger ReceiveSms.delphi
Le code source expliqué dans cet article peut être téléchargé, utilisé et modifié gratuitement.
Téléchargement : ReceiveSms.delphi.zip (11.9Kb)
Que contient le fichier ReceiveSms.delphi.zip ?
Le fichier ReceiveSms.delphi.zip contient l'unité Ozeki.Libs.Rest, qui vous donne tous les outils nécessaires pour envoyer et recevoir des messages SMS. Vous trouverez également le projet ReceiveSms dans le zip, qui contient le code exemple pour vous montrer comment envoyer un SMS. Ce code exemple est listé ci-dessous.
Comment envoyer un SMS depuis Delphi (Instructions simples)
Pour envoyer un SMS depuis Delphi :
- Installer un utilisateur HTTP API
- Activer "Log communication events" dans l'onglet Advanced
- Configurer Embarcadero Delphi Studio
- Télécharger puis extraire le fichier ReceiveSms.delphi.zip
- Ouvrir le fichier ReceiveSms.dproj dans Delphi Studio en double-cliquant dessus
- Lancer l'application Ozeki SMS Gateway
- Exécuter le code Delphi ReceiveSms.dpr dans Delphi Studio
- Vérifier les logs pour voir si le SMS a été envoyé
Installer Ozeki SMS Gateway et créer un utilisateur HTTP API
Pour pouvoir envoyer des SMS depuis Delphi, vous devez d'abord installer Ozeki SMS Gateway. La passerelle SMS peut être installée sur le même ordinateur où vous développez votre code Delphi dans Visual Studio. Après l'installation, l'étape suivante consiste à connecter Ozeki SMS Gateway au réseau mobile. Vous pouvez envoyer un SMS test depuis l'interface Ozeki pour vérifier que votre connexion au réseau mobile fonctionne. La dernière étape pour préparer votre environnement est de créer un utilisateur HTTP SMS API. Créez un utilisateur avec le nom d'utilisateur "http_user" et le mot de passe "qwe123" pour que l'exemple fonctionne sans modification.
Une fois l'environnement configuré, vous pouvez exécuter votre code Delphi.
URL de l'API HTTP pour envoyer un SMS depuis Delphi
Pour envoyer un SMS depuis Delphi, votre application Delphi devra effectuer une requête HTTP vers la passerelle SMS. L'URL de l'API est indiquée ci-dessous. Notez que l'adresse IP (127.0.0.1) doit être remplacée par l'adresse IP de votre passerelle SMS. Si Ozeki SMS Gateway est installé sur le même ordinateur où l'application SMS Delphi est exécutée, cela peut être 127.0.0.1. S'il est installé sur un autre ordinateur, cela doit être l'adresse IP de cet ordinateur.
http://127.0.0.1:9509/api?action=rest
Authentification HTTP pour envoyer un SMS depuis Delphi
Pour authentifier le client SMS Delphi, vous devez envoyer le nom d'utilisateur et le mot de passe dans une chaîne encodée en base64 au serveur dans une requête HTTP. Le format utilisé est : base64(nom d'utilisateur+":"+mot de passe). En Delphi, vous pouvez utiliser le code suivant pour effectuer cet encodage :
var usernamePassword := username + ':' + password;
var Encoder := TBase64Encoding.Create();
var usernamePasswordEncoded := Encoder.Encode(usernamePassword);
result := Format('Basic %s', [usernamePasswordEncoded]);
Par exemple, si vous encodez le nom d'utilisateur 'http_user' et le mot de passe 'qwe123', vous obtiendrez la chaîne encodée en base64 suivante : aHR0cF91c2VyOnF3ZTEyMw==. Pour envoyer
En-tête de requête HTTP pour envoyer un SMS depuis Delphi
Pour envoyer les messages SMS, vous devez inclure les lignes suivantes comme en-têtes dans la requête HTTP. Notez que nous incluons un type de contenu et un en-tête d'autorisation.
Content-Type: application/json Authorization: Basic QWxhZGRpbjpvcGVuIHNlc2FtZQ==
Requête HTTP pour envoyer un SMS depuis Delphi
Pour soumettre le SMS, votre application Delphi enverra une requête HTTP similaire à celle ci-dessous. Notez que cette requête ne contient qu'une partie d'en-tête HTTP, qui contient toutes les informations nécessaires pour télécharger chaque message depuis un dossier spécifique.
GET /api?action=receivemsg&folder=inbox HTTP/1.1 Authorization: Basic aHR0cF91c2VyOnF3ZTEyMw== Host: 127.0.0.1:9509 Accept: application/json User-Agent: Mozilla/3.0 (compatible; Indy Library)
Réponse HTTP reçue par l'exemple SMS Delphi
Une fois que la passerelle SMS reçoit cette requête, elle générera une réponse HTTP. La réponse HTTP contiendra un code de statut pour indiquer si la soumission du SMS a réussi ou non. Elle renverra également une structure encodée en JSON pour vous fournir des détails utiles sur la soumission du message.
HTTP/1.1 200 OK
Transfer-Encoding: chunked
Content-Type: application/json; charset=utf8
Last-Modified: Tue, 27 Jul 2021 15:49:18 GMT
Server: 10/10.3.123 Microsoft-HTTPAPI/2.0
User-Agent: OZEKI 10.3.123 (myozeki.com)
Date: Tue, 27 Jul 2021 14:10:33 GMT
{
"http_code": 200,
"response_code": "SUCCESS",
"response_msg": "",
"data": {
"folder": "inbox",
"limit": "1000",
"data": [
{
"message_id": "be5e98cf-2bcb-d8dc-94ae-aa909504afe7",
"from_connection": "http_user@localhost",
"from_address": "+36201111111",
"from_station": "%",
"to_connection": "http_user@localhost",
"to_address": "http_user",
"to_station": "%",
"text": "Hello world 1",
"create_date": "2021-07-27 16:06:02",
"valid_until": "2021-08-03 16:06:02",
"time_to_send": "2021-07-27 16:06:02",
"submit_report_requested": true,
"delivery_report_requested": true,
"view_report_requested": true,
"tags": [
{
"name": "Type",
"value": "SMS:TEXT"
}
]
},
{
"message_id": "466d737f-68d5-f64d-84d8-ac0a3f950543",
"from_connection": "http_user@localhost",
"from_address": "+36202222222",
"from_station": "%",
"to_connection": "http_user@localhost",
"to_address": "http_user",
"to_station": "%",
"text": "Hello world 2",
"create_date": "2021-07-27 16:06:02",
"valid_until": "2021-08-03 16:06:02",
"time_to_send": "2021-07-27 16:06:02",
"submit_report_requested": true,
"delivery_report_requested": true,
"view_report_requested": true,
"tags": [
{
"name": "Type",
"value": "SMS:TEXT"
}
]
},
{
"message_id": "36069eca-95c1-bced-8876-ece0dcd74acd",
"from_connection": "http_user@localhost",
"from_address": "+36203333333",
"from_station": "%",
"to_connection": "http_user@localhost",
"to_address": "http_user",
"to_station": "%",
"text": "Hello world 3",
"create_date": "2021-07-27 16:06:02",
"valid_until": "2021-08-03 16:06:02",
"time_to_send": "2021-07-27 16:06:02",
"submit_report_requested": true,
"delivery_report_requested": true,
"view_report_requested": true,
"tags": [
{
"name": "Type",
"value": "SMS:TEXT"
}
]
}
]
}
}
Comment envoyer un SMS depuis Delphi en utilisant l'API SMS Delphi (Tutoriel vidéo)
Cette vidéo vous montre comment télécharger le fichier ReceiveSms.delphi.zip depuis cette page, et comment télécharger son contenu dans Delphi Studio. Si vous regardez la vidéo, vous remarquerez que le contenu du zip ReceiveSms.delphi est placé sur le bureau Windows. Vous verrez également que nous double-cliquons sur le fichier de projet ReceiveSms.dproj pour ouvrir le projet.
Exemple SMS Delphi : ReceiveSms.dproj
Dans cette solution, il n'y a qu'un seul projet : ReceiveSms.dproj, et deux fichiers : ReceiveSms.dpr et Ozeki.Libs.Rest.pas.
Comment vérifier que le SMS a été accepté par l'utilisateur HTTP
Après la soumission du SMS, il est conseillé de vérifier votre passerelle SMS, pour voir ce qu'elle a reçu. Vous pouvez vérifier le journal en ouvrant les détails de l'utilisateur HTTP depuis la console de gestion d'Ozeki SMS Gateway. La vidéo suivante vous montre ce qu'il faut rechercher.
Réflexions finales
En suivant ce tutoriel, vous avez appris à utiliser l'utilisateur HTTP SMS API dans Ozeki SMS Gateway pour recevoir des SMS depuis Delphi. Cet exemple SMS Delphi est simple et facile à configurer, il sera compatible avec tout type d'application Delphi que vous possédez. Ce service peut rendre votre organisation plus efficace car il vous permet de diffuser des informations précieuses rapidement et en douceur.
Vous pourriez avoir besoin d'une API SMS Delphi avec d'autres fonctionnalités, alors ne vous arrêtez pas ici. Trouvez plus d'opportunités dans l'article Comment télécharger la dernière unité API SMS Delphi depuis GitHub.
Téléchargez Ozeki SMS Gateway et faites évoluer votre entreprise dès maintenant !
More information
- Envoyer un SMS en Delphi avec l'API REST HTTP (exemple de code)
- Envoyer plusieurs SMS en Delphi avec l'API REST HTTP (exemple de code)
- Planifier un SMS en Delphi avec l'API REST HTTP (exemple de code)
- Recevoir un SMS en Delphi avec l'API REST HTTP (exemple de code)
- Supprimer un SMS en Delphi avec l'API REST HTTP (exemple de code)
- Comment télécharger la dernière unité API SMS Delphi depuis Github