Exception EOleException incompréhensible

Bonjour,

Sur un Double-click sur une ligne d'un DBGrid (nommé "DBGridEleveSelectionnes") je cherche à mettre à jour
le champ "DansT" de la table que le DBgrid affiche avec
le code donné dans ce message. Le Dataset du DBGrid
est filtré avec "DansT = True" pour n'afficher que les
champ ayant un "DansT" true. Donc sur un double-click
le champ "DansT" de la ligne correspondante est positionné à False
et au rafraichissement suivant du DbGrid la ligne
n'est plus affichée.

Tout fonctionne bien excepté pour le dernier enregistrement: quand
je cherche à le supprimer j'ai une exception "EOleException" avec le
message "BOD ou EFO égal à True ou l'enregistrement actuel a été
supprimé. L'opération demandée nécessite un enregistrement actuel".

J'ai toujours autant de mal à comprendre la logique
des pointeurs sur champs de dataset mais bon, je
me suis fais une raison, ça doit être congénital.

Si quelqu'un pouvait m'éclairer je lui en serait reconnaissant !

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

with DBGridEleveSelectionnes.DataSource.DataSet do for i:=0 to DBGridEleveSelectionnes.SelectedRows.Count-1 do begin   GotoBookmark(pointer(DBGridEleveSelectionnes.SelectedRows.Items[i]));   DBGridEleveSelectionnes.DataSource.DataSet.Edit; DBGridEleveSelectionnes.DataSource.DataSet.FieldValues['DansT']:=False; DBGridEleveSelectionnes.DataSource.DataSet.Post;   end;

---

Eric

Si je comprends bien, après ta dernière mise à jour, il n'y a plus rien dans ton Grid ? Le message est clair : il te dit que tu as atteint le début ou la fin du fichier (les deux en fait, puisqu'il n'y a plus rien :D), et qu'il ne trouve pas d'enregistremnet courant.
Maintenant, pourquoi cherche-t-il à se positionner sur un enregistrement courant ? A mon avis, cela ne vient pas du code que tu as cité (à moins que l'emploi du GotoBookmark, mais je ne crois pas...). Peut-être une autre procédure est-elle déclenchée à ce moment ? AfterScroll, OnDataChange...?

Le problème et que c'est le Post (voir mes lignes de code) qui plante
(et c'est vrai que j'aurais du le dire avant).
C'est à dire que pour ce dernier enregistrement, ce qui avait fonctionné
avec les autres ne marche plus: Avant même de sortir de l'actualisation
du champ, on plante (et pour répondre à ta question, je ne fais
plus rien après, ce qui importe peu puisqu'on plante avant).


Eric

Le problème vient du fait que tu modifies la source de données du bookmark en direct.

Exemple :

3 enregistrements affcihés dans la grid: Toto,Titi,Tata
Titi est l'enregistrement courant, et tu le passes à False, vu que tu le fais en direct sur la source du bookmark, ce champ va disparaitre du filtre d'affichage.
Le problème, Titi avait la position 2 dans la liste, Comme il disparait, Tata prend la position 2 et ta boucle cherche la position 3 (bien oui tu viens de traiter la position 2) d'où l'erreur de fin ou debut.

(J'espère avoir été clair ^^)

La solution serait que que tu fasses la modification via une requete et à la fin du traitement tu rafraichis la source de données de ta grille.

Effectivement, je n'avais pas tilté sur le pb de boucle :oops:

Citation:

---

Envoyé par Rayek

La solution serait que que tu fasses la modification via une requete et à la fin du traitement tu rafraichis la source de données de ta grille.

---

C'est sûr que ce serait le plus propre, mais est-ce que ça ne marcherait pas simplement en modifiant dans l'ordre inverse ?

Code:

---

for i:= DBGridEleveSelectionnes.SelectedRows.Count-1 downto 0 do

---

Citation:

---

Envoyé par rsc

Effectivement, je n'avais pas tilté sur le pb de boucle :oops:

C'est sûr que ce serait le plus propre, mais est-ce que ça ne marcherait pas simplement en modifiant dans l'ordre inverse ?

Code:

---

for i:= DBGridEleveSelectionnes.SelectedRows.Count-1 downto 0 do

---

---

Oui, ca fonctionnerai aussi en utilisant une boucle décrémenté.
C'est le même problème que quand on supprime une ligne dans une liste en utilisant une boucle.

Code:

---

1 2 3 4 5 6 7 8 9 10

with DBGridEleveSelectionnes,DataSource.DataSet do for i:=SelectedRows.Count-1 downto 0 do begin GotoBookmark(pointer(SelectedRows.Items[i]));   Edit; FieldValues['DansT']:=False; Post; end;

---

PS: J'ai modifié le With, le code devient un peu plus lisible en remplacant un des . par une , ^^

bonjour, toutes mes excuses pour le délai de suivi de la conversation, j'ai été pris par un autre projet.

Donc je suis dubitatif. C'est l'évènement On Double click qui appelle le code que j'ai donné. Et donc il n'y toujours qu'un seul élément de la liste qui est sélectionné. Donc pas d'itération: la boucle n'est parcourue qu'une seule fois.
(il est vrai que de ce fait j'aurais pu me dispenser d'écrire une boucle for mais j'avoue que je n'étais pas certain de n'avoir qu'un seul élément sélectionné à chaque appel, donc j'ai préfére ne pas prendre de risque).

J'ai cherché à dévalider le filtrage du Dataset avant le code (Filtered=False)
et à le remettre le traitement fait. Ca fonctionne. Avec cependant le pb prévisible qui est que tous les records sont affichés pendant le traitement (dufait de la dévalidation du filtrage) qui, même si il est court, donne parfois le temps au programme d'en rendre compte visuellement.

Je comprends donc que d'une certaine façon votre réponse a du vrai.
Mais elle ne m'explique pas entièrement le phénomène. On plante sur
le post (et pas après ! ) et là, à priori, on ne pointe pas encore sur l'enregistrement suivant.


Cordialement

Eric