Discussion :

[lanonyme]

Bonjour,
Me revoila

Je maîtrise maintenant les ADOQuery

Seulement ce n'est pas la solution a mon probleme (enfin je crois pas)

En effet, je désire stocker temporairement les resultats d'un select(une a plusieurs valeurs récupérés) , effectué avec ADO (Connexion, DataSet, Command), et donc les exploitent sans être connecter à la bdd.
Mon soucis est donc que le DataSet doit être ouvert (donc connecté a la bdd), ce que je souhaite pas.

Mon second soucis est que ses informations sont sous forme de tables donc pour les stocker dans des listes ....

Voila je suis tout ouïe à vos solutions (simple si possible ).

[Sunchaser]

Bonjour (hé oui, c'est le matin...il est 01h26 !)

Une idée qui me passe dans la tête avec une TStringList pour stocker éventuellement le résultat de ta requête :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
TStringList* pList = new TStringList(); String S;
Form2->Query1->First();
while(!Form2->Query1->Eof)
{
S = Form2->Query1->Fields->Fields[1]->Value + AnsiString("=");
        for (int i = 2; i < Form2->Query1->Fields->Count; i ++)
        {
                S = S + Form2->Query1->Fields->Fields[i]->Value ;//+ AnsiString(";");
        }
                pList->Add(S);
Form2->Query1->Next();
}

C'est un petit test pas tres beau, mais c'etait pour donner une idée (donc code a retravailler)...
Apres tu peut récupérer les valeurs avec, par ex :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
for (int j = 0; j < pList->Count; j ++)
{
S = pList->Strings[j];
        for (int k = 2; k < Form2->Query1->Fields->Count; k ++)
        {
                S = S + AnsiString(" ") + pList->Values[k];
        }
        ShowMessage(S);
}
}

Mais tout dépends aussi de la manière dont tu voulais pouvoir travailler apres...
@ +

[lanonyme]

Bonjour,

Il ne peut sortir que de bonnes idées aussitôt le matin

Aprés adaptation, j'obtient ceci:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 
 // Enregistrement des données dans une liste
 frmIdentification->ADODataSet->First() ; // Retourne au premier
 while(!frmIdentification->ADODataSet->Eof)
  {
      S = frmIdentification->ADODataSet->Fields->Fields[1]->Value + AnsiString(";");
      for (int i = 2; i < frmIdentification->ADODataSet->Fields->Count; i ++)
      {
           if (!VarIsNull(frmIdentification->ADODataSet->Fields->Fields[i]->Value))// Test si NULL
              S = S + frmIdentification->ADODataSet->Fields->Fields[i]->Value + AnsiString(";");
            else
                S = S +  AnsiString(" ;") ;
       }
       pList->Add(S);
      frmIdentification->ADODataSet->Next();
  }

J'utilise un DataSet au lieu du Query mais ca revient au même
Un petit détaille qui porte son importance, j'utilie la fonction VarIsNull car j'ai des valeurs nulle

Mon but final est de réutilisé une partie de ses informations pour effectuer des tests (Date et Heure) et d'afficher les renseignements correspondant.

Un rappel de rendez-vous en faites

Me restera plus qu'a decortiqué ma chaine de caracteres séparé par des points virgule.

Merci Cantrelle

lanonyme