Bonjour,
J'ai un probleme lorsque la requete renvoie des résultats ou non je n'arrive pas à tester si la requête est vide, je travaille avec une base MYSQL. Voici le code :
Code :
if mysql_query(mySQLConnection,pChar( 'select id from theme where pere='+Frm_searchDoc1.Edit_Id.text))= 0 then begin
myRES := mysql_store_result(mySQLConnection);
if myRES <> nil then begin
//on récupère les thèmes on les met dans le combobox invisible
for i := 0 to myRES.row_count - 1 do begin
myROW := mysql_fetch_row(myRES);
for j := 0 to mysql_num_fields(myRES) - 1 do begin
aStr:=myROW^[j];
Frm_searchDoc1.Cbox_ListeId.Items.Add(aStr);
count_Res:=count_Res+1;
end;
end;
end else showMessage('pas de resultats');
mysql_free_result(myRES);
end;
Lorsque je teste le programme et que je clique sur un objet dont la requete est nil le programme plante car il passe tout de même le test myRES <> nil. Je sais pas quoi faire si quelqu'un peu m'aider merci d'avance.