[MYSQL] Erreur: mysql_num_fields

Bonjour,

Suite à l'exécution d'une requête, je souhaite récupérer le nom des champs pour alimenter une StringList. La requête est correctement exécutée puisque je peux crée dynamiquement par la suite un StringGrid contenant les valeurs résultantes de ma requête.

voici la boucle qui pose problème:
myFields := mysql_fetch_fields(myRES);
nb_champs := mysql_num_fields(MyRes);

Code:

---

1 2 3 4 5

for i := 0 to nb_champs - 1 do begin astr := myfields^[i].name; list.Add(astr); end;

---

Petit exemple: ma requête contient 3 champs. Lorsque je fais:
myfields^[0].name; qui me donne le bon de champs
myfields^[1].name; la chaîne donnée est vide
myfields^[2].name; plante

Je ne comprend pas où est mon erreur.

Il nous manque du code (je pense surtout mysql_fetch_row), mais je peux te donner le mien, qui rempli un DataSet Mémoire à partir des API

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 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39

with TMemoryClientDataSet(Result) do begin   // initialisation des colonnes mysql_field_seek(Result_RES, 0); for iCol := 0 to mysql_num_fields(Result_RES)-1 do begin Field_RES := mysql_fetch_field(Result_RES); AddField(Field_RES.name, TypeMySQLToTypeDB(Field_RES._type), GetLengthTypeMySQL(Field_RES._type, Field_RES.max_length)); end;   Open();   // Remplissage des Champs Record_RES := mysql_fetch_row(Result_RES);     while Assigned(Record_RES) do begin mysql_field_seek(Result_RES,0);   Append(); for iCol := 0 to mysql_num_fields(Result_RES)-1 do begin Field_RES := mysql_fetch_field(Result_RES); if Assigned(Record_RES[iCol]) then begin Fields[iCol].Value:= ValueMySQLToDB(Field_RES._type, Record_RES[iCol]); end; end; Post();   Record_RES := mysql_fetch_row(Result_RES); end; end; end;

---