Discussion :

[Mowgly]

Bon je vais essayer de vous expliquer mon pb !!!
Apres avoir fait une requete SQL sur mes differentes tables et que j'ai mis le resultat de cette requete dans une DBGrid par l'intermediaire d'un SQLClientDataSet et d'un SQLConnection, je voudrais recup les données de ma DBGrid et les mettre ds un fichier texte car j'ai essayer directement avec la commande SQL "SELECT * INTO OUTFILE ....." mais ça me fait un gros bug !!!
Pourriez vous eclairer ma lanterne !!!
Merci
ZEMOW

[Laurent BERNE]

As tu essayer la méthode :
TCustomClientDataSet::SaveToFile ? ca te permet d'exporter entre autre en XML

Sinon il te reste la méthode avec un TStringList.
Tu instancies un TStringList;

tu fais un

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
while(!CustomClientDataSet->Eof)
 {
   String MaLigne = TCustomClientDataSet->FieldByName("Champs1")->AsString+";"+....
CustomClientDataSet->Next();
 
}

[Mowgly]

C Sympa ! mais ta methode ne marche qu'avec "CustomClientDataSet" et pas avec "SQLClientDataSet" !!!
Donc je sais toujours pas comment faire !!
mais merci qu'en meme !!!!!
ZEMOW

[Laurent BERNE]

TQLClientDataSet est le descendant direct de CustomClientDataSet.
Ce qui veut dire qu'il a hérité de toutes ses méthodes publiques.

En fait le code que je t'ai donné est valable pour tous les descendants de TDataSet (TTable et TQuery entre autre..)

[Mowgly]

ok ok ok désolé !!!
je savais pas !!!!
Merci bcp !!!!!!
ZEMOW

[Laurent BERNE]

Bah y'a pas de quoi être désolé ;-))
ravi de t'avoir rendu service

Juste une précision : j'ai oublié dans le code de dire qu'il fallait que tu ajoutes la String dans la TStringList.
i.e:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
TStringList *MyList= new TStringList();
while (!DataSet->Eof)
{
String MaLigne;
bla
bla
MyList->Add(MaLigne);
DataSet->Next();
};
 
MyList->SaveToFile("MonFichier.txt");

Voilà !