Bonjour,

J'ai un probleme avec mon programme qui ne fait pas ce que je veux et je pense que c'est ma requete qui ne renvoie rien et je ne comprends pas pourquoi je donne mon code.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
idTheme:=ComboBox1.items[cpt];
            id2:=Integer(idTheme);
je récupère l'idée du theme dans une combobox
après j'essaye de l'utiliser j'ai meme essayer de le caster en integer je me suis dit que c'était peut etre ca mais non voici le reste

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
idTheme:=ComboBox1.items[cpt];
            id2:=Integer(idTheme);
            if mysql_query(mySQLConnection, 'select nom from theme where id=:id2') = 0 then begin
            myRES := mysql_store_result(mySQLConnection);
                if (myRES <> nil) then begin
                myROW := mysql_fetch_row(myRES);
                nomTheme := myROW^[0];
                end;
            end;
je récupère le nom du theme avec l'idée ca a pas l'air de marcher puisque
le nom affiché a l'ecran est celui que je donne à l'objet dans ces lignes suivantes.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
 //sous theme crée à la position X,Y
		     theme:=tst.create(PanelP,posX[cpt mod 9],posY[cpt mod 9],nomTheme);
         theme.Name:=format('theme%s',[idTheme]);
Je créer l'objet avec pour caption nomTheme mais ce qui s'affiche c'est theme.name et j'ai verifie nomTheme est vide. Le champ id est un int.
Merci d'avance.