TMyquery et recordCount

Bonjour,
je souhait connaitre le nombre de ligne que me retourne ma requête (faite par un composant TMyQuery) après exécution.

Pour cela j'ai fait le code suivant.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

procedure TFormNewArea.MyQueryChannelAfterExecute(Sender: TObject; Result: Boolean); var indice : integer; begin inherited; indice := 0; if MyQueryChannel.RecordCount <> 0 then begin while not EOF do begin indice := indice + 1; AdvStringGrid1.Cells[indice,1] := MyQueryChannel.Fields[0].Value; Next; end; end; end;

---

Mais je ne sais pas pourquoi, je ne passe jamais mon If, RecordCount valant tous le temps zéro, alors que ma requête s'effectue correctement.
Un indice ?
Merci

Salut,

J'ai déjà lu sur le site que RecordCount posait des soucis ...
Le mieux à faire, c'est une requête SQL qui te retournera le nombre d'enregistrement ... Ca sera surement plus sûr ...

J'espère t'avoir aidé.
A+ :D

Il y a aussi IsEmpty, et dans ton cas le EOF va vérifier avant, donc tu peux enlever le test !

Bonjour,
lorsque j'ai rencontré ce problème je me suis renseigné et j'ai aussi lu qu'il valait mieux utilisé Count.
Mais j'ai quand même posé cette question pour comprendre un peu plus l'utilisation de MyQuery et essayé de progresser.
Merci

Re bonjour,
je pense que mon problème vient que je regarde l'état du RecordCount avec l'événement "AfterExcecute".
Si je fait

Code:

---

1 2	MyQuery.execute; MyQuery.recordCount;

---

dans ce cas, le recordCount prend une valeur correcte.
Sur quel peut donc être le type d'événement qui convient à la place de AfterExecute ? J'en ai testé quelqu'un mais rien de concluant.

Pourquoi passer par un évènement, tu peux très bien faire une méthode FillGrid a appeler après un Execute ... il est bien mieux de maitriser ce que l'on fait que de tout déporté dans des comportements automatiques (pense à la maintenance du programme plus tard ...)

C'est exactement ce que je vient de faire.
Je gère mon recordcount après un exécute.
Mais justement je croyait que c'était plus propre de passer par les évenements.
Merci pour ton aide.
Je passe en résolut.

le fait que tu lances une requête dans une forme sans passer par un objet métier, et que tu remplisse la grille directement, me fait dire que tu n'as pas une architecture qui sépare la présentation du métier, c'est très courant, dans les 5 boites que j'ai faite, je ne l'ai jamais vu correctement appliqué, et en fait une seule en avait la volonté, s'en était presque donné les moyens, mais derrière c'était souvent très mal fait ... en un modèle vieillissant comme le Modèle MVC reste pour moi une référence, certains diront que c'est obselète, mais lorsque tu as le temps de faire propre (ce n'est pas souvent le cas), autant le faire, c'est souvent là que l'on fait le code plus fun ...

Tu as tres bien resumer la situation. Je reprend une partie de projet sans avoir la moindre vu d'ensemble d'ou le besoin de ne travaillé que sur mes formes pour pas tout "pourrir".
je n'aime pas beaucoup l'automatisation des composant de delphi. Ca me semble tres pratique certaine fois, mais j'ai l'impresion de perdre le controle.
mais bon, mon tuteur veut que je fasse le plus souvent comme ca, donc je n'ai pas vraiment le choix.

Pas bol, si tu as un tuteur qui code avec ses pieds ... j'ai eu de la chance le mien était un ancien horloger militaire (appareillage des avions, il y a ouf longtemps ...), mais sa rigueur, il me l'a transmise et avec mon caractère de chein, cela donne un troll aujourd'hui :mouarf:

tient lit ce sujet, sur l'abus de component ... Projet sérieux sous Delphi - Page 4 ,