Exemple Datasnap [Résolu]
sp40
Contributeur Dernière intervention
3 juillet 2015
- - Dernière réponse :
sp40
Contributeur Dernière intervention
3 juillet 2015
- 27 juil. 2012 à 17:40
- Messages postés
- 1293
- Date d'inscription
- mardi 28 octobre 2003
- Statut
- Messages postés
- 1293
- Date d'inscription
- mardi 28 octobre 2003
- Statut
A voir également:
- Delphi datasnap
- Delphi json example - Meilleures réponses
- Datasnap - Meilleures réponses
- Extraction de données dans une base de données ODBC avec un Data Source Name (DSN) en C# - Conseils pratiques - C# / .NET
- Exemple de création d'un script d'authentification - Conseils pratiques - PHP
- La poo en javascript par un exemple pratique et visuel - Conseils pratiques - Javascript
- Réaliser un effet de carte pour vos jdr (par exemple) - Conseils pratiques - Graphisme
- [poo] exemple alternative à un captcha - Conseils pratiques - PHP
11 réponses
Meilleure réponse
- Messages postés
- 133
- Date d'inscription
- mercredi 4 février 2004
- Dernière intervention
- 25 juillet 2012
Bonsoir à tous,
J'arrive un peu tard visiblement mais bon ça peut être utile je pense vu qu'il s'agit du même cas de figure (XE2 / datasnap / Firebird 2.5).
Pour passer un objet du serveur au client, il nous a été conseillé par embarcadero de le serialiser/deserialiser à l'aide de JSON quand cela concerne des objets ou des types de données spécifique. En utilisant une unité commune entre le client et le serveur quand il s'agit de type de données personnalisés afin que JSON sache comment le sérialiser/désérialiser. Il y a un tutoriel sur le net la dessus si mes souvenirs sont bons !
Voilà j'espère avoir pu faire avancer le schmilblik !
Que la force soit avec vous !
J'arrive un peu tard visiblement mais bon ça peut être utile je pense vu qu'il s'agit du même cas de figure (XE2 / datasnap / Firebird 2.5).
Pour passer un objet du serveur au client, il nous a été conseillé par embarcadero de le serialiser/deserialiser à l'aide de JSON quand cela concerne des objets ou des types de données spécifique. En utilisant une unité commune entre le client et le serveur quand il s'agit de type de données personnalisés afin que JSON sache comment le sérialiser/désérialiser. Il y a un tutoriel sur le net la dessus si mes souvenirs sont bons !
Voilà j'espère avoir pu faire avancer le schmilblik !
Que la force soit avec vous !
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
a aidé 98 internautes ce mois-ci
- Messages postés
- 1293
- Date d'inscription
- mardi 28 octobre 2003
- Statut
Alors, on avance...
Pour le problème "erreur distante : erreur DBX : le pilote n'a pas été correctement initialisé. La bibliothèque est manquante, n'est pas correctement installée, sa version est incorrecte, ou le pilote n'est pas dans le chemin système" : J'ai réinstallé FireBird 2.5, et recopié le fbClient.dll dans le dossier sysWOW64. J'y ai aussi mis le dbxfb.dll ainsi que les fichiers midas.* trouvés dans le dossier embarcadero. Et là, merveille, j'affiche le dataset dans le client !!!
Reste le souci de fuite memoire pour les fonctions qui retournent un objet...
Simon
Pour le problème "erreur distante : erreur DBX : le pilote n'a pas été correctement initialisé. La bibliothèque est manquante, n'est pas correctement installée, sa version est incorrecte, ou le pilote n'est pas dans le chemin système" : J'ai réinstallé FireBird 2.5, et recopié le fbClient.dll dans le dossier sysWOW64. J'y ai aussi mis le dbxfb.dll ainsi que les fichiers midas.* trouvés dans le dossier embarcadero. Et là, merveille, j'affiche le dataset dans le client !!!
Reste le souci de fuite memoire pour les fonctions qui retournent un objet...
Simon
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
a aidé 98 internautes ce mois-ci
- Messages postés
- 92
- Date d'inscription
- mercredi 12 septembre 2007
- Dernière intervention
- 23 janvier 2017
Bonjour,
Si le but c'est d'envoyer une liste de chaine de caractères pourquoi ne pas utiliser un TJsonArray.
Côté serveur :
Et côté client (Dans l'exemple je met le résultat dans une listbox) :
Voila en espérant que ça aide.
Thierry Laborde
ArrowEcs
Responsable Technique Embarcadero
http://blogs.embarcadero.com/tlaborde
Si le but c'est d'envoyer une liste de chaine de caractères pourquoi ne pas utiliser un TJsonArray.
Côté serveur :
function TServerMethods1.ListeString: TJSONArray;
var
JsonArray:TJSONArray;
Liste:TStringList;
i: Integer;
begin
Liste:= TStringList.Create;
// Remplissage de la liste....
JsonArray:=TJSONArray.Create;
for i := 0 to Liste.Count-1 do
begin
JsonArray.Add(Liste[i]);
end;
Result:=JsonArray;
end;
Et côté client (Dans l'exemple je met le résultat dans une listbox) :
procedure TForm1.Button1Click(Sender: TObject);
var
ServerDs:TServerMethods1Client;
JsonArray:TjsonArray;
i:integer;
begin
ServerDs: =TServerMethods1Client.Create(SqlConnection1.DBXConnection);
JsonArray:=ServerDs.ListeString;
for i := 0 to JsonArray.Size-1 do
begin
ListBox1.Items.Add(JsonArray.Get(i).Value);
end;
end;
Voila en espérant que ça aide.
Thierry Laborde
ArrowEcs
Responsable Technique Embarcadero
http://blogs.embarcadero.com/tlaborde
- Messages postés
- 4996
- Date d'inscription
- dimanche 26 février 2006
- Dernière intervention
- 27 mars 2018
- Messages postés
- 4996
- Date d'inscription
- dimanche 26 février 2006
- Dernière intervention
- 27 mars 2018
- Messages postés
- 4996
- Date d'inscription
- dimanche 26 février 2006
- Dernière intervention
- 27 mars 2018
- Messages postés
- 1293
- Date d'inscription
- mardi 28 octobre 2003
- Statut
Bonjour et merci pour vos réponses.
à tlaborde :
Je veux bien essayer avec un JSONArray. Mais à priori, la liste créée côté serveur n'est pas libérée ("Liste:=TStringList.Create;
), ni le jsonarray (dans la mesure où il peut être libéré, je ne sais pas, mais dans le code serveur, il y a bien un "JsonArray:=TJSONArray.Create;"). Dans ce cas, on aura encore une fuite mémoire sur le serveur et autant retourner directement la liste en résultat de la fonction (fuite mémoire pour fuite mémoire, autant coder plus simplement )
Par ailleurs, je rencontre également des difficultés avec le groupe de composants SQLConnection + DSProviderConnection + ClientDataset.
Sur le serveur (machine : windows server 2008 r2), j'ai un SQLConnection, un DatasetProvider (exported = true) et un SQLDataset. Sur le client (machine : Xp pro sp3), je peux connecter le SQLConnection, le dsProviderConnection, mais dès que je veux connecter le ClientDataset, j'ai un message "erreur distante : erreur DBX : le pilote n'a pas été correctement initialisé. La bibliothèque est manquante, n'est pas correctement installée, sa version est incorrecte, ou le pilote n'est pas dans le chemin système".
"Distante", je suppose que ça signifie que l'erreur vient du serveur. Sur le serveur, j'ai copié dans system32 (vu que le serveur est une appli win32) le fichier "C:\Program Files\Embarcadero\RAD Studio\9.0\Redist\win32\dbxfb.dll" en provenance de mon poste de dev (config actuelle). J'ai essayé toutes les combinaisons (fichier "C:\Program Files\Embarcadero\RAD Studio\9.0\Redist\win64\dbxfb.dll" et repertoire serveur "sysWOW64"), rien n'y fait. J'ai également essayé avec Firebird 2.5 (64 bits et 32 b), firebird 2.1 (32 b) et firebird 2.0, sans succès... Avez-vous déjà rencontré le problème ? Y a t'il une manipulation à faire avec cette dll dbxfb.dll ?
Simon
à tlaborde :
Je veux bien essayer avec un JSONArray. Mais à priori, la liste créée côté serveur n'est pas libérée ("Liste:=TStringList.Create;
), ni le jsonarray (dans la mesure où il peut être libéré, je ne sais pas, mais dans le code serveur, il y a bien un "JsonArray:=TJSONArray.Create;"). Dans ce cas, on aura encore une fuite mémoire sur le serveur et autant retourner directement la liste en résultat de la fonction (fuite mémoire pour fuite mémoire, autant coder plus simplement )
Par ailleurs, je rencontre également des difficultés avec le groupe de composants SQLConnection + DSProviderConnection + ClientDataset.
Sur le serveur (machine : windows server 2008 r2), j'ai un SQLConnection, un DatasetProvider (exported = true) et un SQLDataset. Sur le client (machine : Xp pro sp3), je peux connecter le SQLConnection, le dsProviderConnection, mais dès que je veux connecter le ClientDataset, j'ai un message "erreur distante : erreur DBX : le pilote n'a pas été correctement initialisé. La bibliothèque est manquante, n'est pas correctement installée, sa version est incorrecte, ou le pilote n'est pas dans le chemin système".
"Distante", je suppose que ça signifie que l'erreur vient du serveur. Sur le serveur, j'ai copié dans system32 (vu que le serveur est une appli win32) le fichier "C:\Program Files\Embarcadero\RAD Studio\9.0\Redist\win32\dbxfb.dll" en provenance de mon poste de dev (config actuelle). J'ai essayé toutes les combinaisons (fichier "C:\Program Files\Embarcadero\RAD Studio\9.0\Redist\win64\dbxfb.dll" et repertoire serveur "sysWOW64"), rien n'y fait. J'ai également essayé avec Firebird 2.5 (64 bits et 32 b), firebird 2.1 (32 b) et firebird 2.0, sans succès... Avez-vous déjà rencontré le problème ? Y a t'il une manipulation à faire avec cette dll dbxfb.dll ?
Simon
- Messages postés
- 1293
- Date d'inscription
- mardi 28 octobre 2003
- Statut
ah oui, j'ai oublié ! Un autre souci : si je fais un serveur avec authentification (id et password), l'assistant de création du module client datasnap me bloque sur l'authentification car il prend l'ID pour le mot de passe. Si je veux utiliser l'assistant, je suis obligé de "désécuriser" mon serveur le temps de la création du client datasnap...
Simon
Simon
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.