Meme en procedant comme ceci:
void __fastcall TForm1::afficherReq()
{
/*AnsiString nom = "";
AnsiString prenom = "";
AnsiString filiere = "";
Memo1->Clear();*/
// ouverture connexion, bdd et requête
Session1->Open();
Database1->Open();
Query1->Open();
// on se positionne au début
/*Query1->First();
// on parcourt le résultat de la requête
while(!Query1->Eof)
{
// on récupère les champs nom et prénom
nom = Query1->FieldByName("nom")->AsString;
prenom = Query1->FieldByName("prenom")->AsString;
filiere = Query1->FieldByName("filiere")->AsString;
// on ajoute une ligne à notre mémo
Memo1->Lines->Add(nom+" "+prenom+" - "+filiere);
// on passe à la ligne suivante
Query1->Next();
}
*/
// on ferme connexion, bdd et requête
Query1->Close();
Database1->Close();
Session1->Close();
}
Ca ne marche pas. Je ne vois pas d'ou viens l'erreur car un simple SELECT en enlevant les "/*...*/" marche parfaitement.
Et je n'ai toujours pas trouvé comment changer la valeur SQL d'un composant TQuery. Je n'ai pas envie de créer 35000 composants au vus des requetes que je voudrai faire. Merci d'avance.