[IB][TIBCLIENTDATASET][D7 pro] LoadFromFile()

Bonjour,

Impossible de recharger un fichier dans un TIBClientDataSet.

Je sauvegarde un enregistrement avec SaveToFile() , lorsque je veux recharger le fichier dans mon TIBClientDataSet avec LoadFromFile(), j'ai toujours un message d'erreur :

Classe d'exception EDBClient avec le message "Non concordance dans le paquet de données"

Or je sauvegarde et recharge depuis la même table .
Les noms des champs, le type de données et leur longueur est donc la même!

Quelqu'un connaît-il une procédure qui permettrait de sauvegarder des enregistrements dans un fichier et qui permettrait de les recharger ultérieurement ? Avec quel composant : IBQuery, IBClientdataSet ... ?
Attention : Une image BMP figure parmi les données à sauvegarder.

Merci d'avance.

N1bus

Bon,aprés des heures de recherche sur le Web, j'ai finalement trouvé une solution que j'ai adapté à mon cas.

Pour ne pas avoir cette erreur, il faut créer un TIBClientDataset supplémentaire, y charger le fichier , puis transférer les données dans le
TIBClientDatset d'origine pour enfin les envoyer dans la base.

Ce qui donne un truc comme ça :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24

With TIBClientDataSet.Create(nil) do // création du TIBClientDataset supplémentaire begin try LoadFromFile('MonFichierXport.TLD'); // chargement du fichier First(); if MonTIBClienDS_Dorigine.Active = False then MonTIBClienDS_Dorigine.Open; // ouverture du TIBClientDataset d'origine while not Eof do // copie des valeurs dans les champs correspondants begin MonTIBClienDS_Dorigine.Append(); for i := 0 to MonTIBClienDS_Dorigine.FieldCount-1 do begin for j := 0 to FieldCount-1 do if MonTIBClienDS_Dorigine.Fields[i].FieldName = Fields[j].FieldName then MonTIBClienDS_Dorigine.Fields[i].Value := Fields[j].Value; end; MonTIBClienDS_Dorigine.Post(); Next(); end; finally Free(); end; end; IBTransaction.Commit ; // validation de la transaction

---

Attention :
Pour que cela fonctionne, il faut avoir sauvé le fichier au préalable avec le
TIBClientDataset d'origine pour que les champs correspondent (type de données + longueurs). Sinon Erreur !

Pour info : Dans mon cas, les Blob texte ou BMP fonctionnent normalement aprés le rechargement des données.

Voilà.
En espérant que cela serve à quelqu'un...

N1bus