Tutoriel : Implémentation de votre première application client RAD Server
Remonter à Application client de RAD Server
Vous pouvez créer une application client EMS pour établir une connexion au serveur EMS via l'API REST que le serveur EMS expose. Pour accéder aux informations et aux ressources du serveur EMS depuis la base de données EMS, vous pouvez utiliser l'API intégrée ou votre ressource API personnalisée.
Dans ce tutoriel, vous avez besoin des composants suivants dans votre application client EMS :
- Le composant TEMSProvider est utilisé pour configurer la connexion au serveur EMS.
- Le composant TBackendEndpoint est utilisé pour accéder à une méthode particulière de point de terminaison de ressource EMS depuis votre application client EMS (l'une des méthodes de l'API REST du serveur EMS). Une application client EMS appelle le TBackendEndpoint pour exécuter un GET ou POST JSON depuis/vers le serveur EMS.
- Remarque : Chaque composant TBackendEndpoint est configuré pour accéder à un point de terminaison de ressource EMS. Ajoutez autant de composants TBackendEndpoint que d'accès aux méthodes de point de terminaison de ressource EMS.
Pour effectuer un appel à un point de terminaison de l'API REST, vous devez sélectionner la méthode adéquate dans la propriété Method du composant TBackendEndpoint.
Sommaire
Création d'un client EMS
- Créez une nouvelle application multi-périphérique:
- Pour Delphi : Ouvrez Fichier > Nouveau > Application multi-périphérique - Delphi
- Pour C++ : Ouvrez Fichier > Nouveau > Application multi-périphérique - C++Builder
- Dans la palette d'outils, recherchez un composant TEMSProvider et déposez-le sur la fiche.
- Dans l'inspecteur d'objets, configurez les paramètres du serveur EMS en fonction de la configuration du serveur EMS :
- URLHost :
localhost
- URLPort :
8080
- URLProtocol :
http
- URLHost :
- Cliquez sur le bouton Tester la connexion. Si la connexion est correctement configurée, vous obtiendrez un message avec la version en cours du serveur EMS.
- Dans la fenêtre du serveur EMS, le volet journal affiche la requête de version.
Appel d'une méthode de point de terminaison de ressource
Vous pouvez appeler les points de terminaison de ressource du serveur EMS pour récupérer ou définir des données par le biais d'appels d'API REST à partir de votre application client EMS.
Vous pouvez utiliser les méthodes de point de terminaison de l'API administrative EMS depuis votre serveur EMS ou les points de terminaison de ressource personnalisée qui étendent la fonctionnalité du serveur EMS.
- Dans votre application client EMS, déposez un composant TBackendEndpoint sur la fiche.
- Dans l'inspecteur d'objets, définissez les paramètres suivants du TBackendEndpoint afin d'utiliser la ressource du serveur EMS :
- Provider. Dans la liste déroulante, sélectionnez le nom du composant TEMSProvider (
EMSProvider1
). - Resource :
Version
- Resource suffix : Laissez cette propriété vide pour ce tutoriel.
- Method :
rmGET
- Provider. Dans la liste déroulante, sélectionnez le nom du composant TEMSProvider (
- Si les paramètres sont correctement définis, vous obtiendrez une réponse de réussite du serveur EMS lors du test de configuration du composant TBackendEndpoint. Vous pouvez effectuer l'une des opérations suivantes :
- Dans l'inspecteur d'objets, cliquez sur Exécuter.
- Cliquez avec le bouton droit sur le composant TBackendEndpoint et choisissez Exécuter.
- Dans la fenêtre du serveur EMS, le volet journal affiche la requête de version.
Liaison visuelle de vos données
Vous pouvez lier visuellement les données de réponse (depuis le serveur EMS) à un composant dans votre application client EMS.
- Ouvrez le Concepteur LiveBindings pour lier visuellement les données de réponse pour votre application client EMS. Sélectionnez Voir > Concepteur LiveBindings
- Dans le Concepteur LiveBindings, cliquez avec le bouton droit sur la propriété Response.JSONText du composant TBackendEndpoint et choisissez l'option Lier à un nouveau contrôle pour lier la réponse à un nouveau composant TMemo.
- Déposez un TLabel sur la fiche.
- Dans l'inspecteur d'objets, définissez la propriété Text sur
EMS Server Version
- Dans l'inspecteur d'objets, définissez la propriété Text sur
- Déposez un nouveau composant TButton sur votre fiche.
- Dans l'inspecteur d'objets, définissez la propriété Text sur
GetVersion
- Dans l'inspecteur d'objets, définissez la propriété Text sur
- Créez l'événement OnClick du composant TButton (double-clic dessus) et ajoutez le code suivant :
- Delphi :
procedure TForm1.Button1Click(Sender: TObject); begin BackendEndpoint1.Execute; end;
- C++ :
void __fastcall TForm1::Button1Click(TObject *Sender) { BackendEndpoint1->Execute(); }
- Construisez et exécutez votre application.