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.
je récupère l'idée du theme dans une combobox
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 idTheme:=ComboBox1.items[cpt]; id2:=Integer(idTheme);
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
je récupère le nom du theme avec l'idée ca a pas l'air de marcher puisque
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;
le nom affiché a l'ecran est celui que je donne à l'objet dans ces lignes suivantes.
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.
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]);
Merci d'avance.
Partager