Discussion :

[cilies38]

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.

[Rayek]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
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;

L'erreur est dasn la requete que tu envois.
Tu ecris dans la requete :id2, le seul problème c'est que tu ne renseignes nul part ce paramètre.
Ce n'est pas parce que tu assignes une valeur à la variable Id2 que celle ci va se mettre automatiquement dans la requete.

Je te conseil d'ecrire ta requete comem ci dessous :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
            if mysql_query(mySQLConnection, 'select nom from theme where id=' + inttostr(Id2)) = 0 then begin
 
ou
 
 if mysql_query(mySQLConnection, 'select nom from theme where id=' + ComboBox1.items[cpt]) = 0 then begin

Ca devrait fonctionner mieux ^^

[cilies38]

j'ai une erreur type incompatible string et PAnsiChar
sur la requete!!!

[cilies38]

alors la je vois pas d'ou ca vient

[Rayek]

essaie comme ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
 if mysql_query(mySQLConnection, PCHAR( 'select nom from theme where id=' + inttostr(Id2))) = 0 then begin

[cilies38]

probleme a l'execution maintenant EaccessViolation la ligne surligné :
nomTheme := myROW^[0];
Ya de quoi s'arracher les cheveux en PHP c'est pas aussi compliquer une requete lol

[Rayek]

Avec les composants de base c'est aussi simple qu'en php ^^
Et je ne pourrais pas t'aider pour la suite vu que je n'ai jamais utilisé la lib MySQL.

[cilies38]

oue ben je sais pas quoi faire, mais merci beaucoup quand meme de m'avoir aidé je vais regarde si je trouve quelquechose mais y'a pas grand chose sur internet.

[cilies38]

avec combobox.items[cpt] ca a l'air de fonctionner merci mais ya encore des blèmes il me créer toujours le meme objet mais ca va mieux quand meme merci beaucoup!