TAdoQuery et mise à jour après suppression

Bonjour, je n'arrive pas à faire une mise à jour de mon TAdoQuery après avoir vider l'ensemble des lignes de ma table (toutes les lignes sont supprimés par des DELETE FROM client where id = ...).

Concrètement j'ai un composant TAdoQuery qui est positioné sur la table Client. Lorsque j'efface une ligne j'utilise le composant TAdoCommand. Lorsque j'ai encore des lignes dans Client, TQuery pointe sur l'avant dernier enregistrement après la suppression d'une ligne. Mais s'il me reste une seule ligne dans ma table, TQuery ne se met pas à jour.

La solution que j'ai trouvé est de faire :

Code:

---

1 2 3

Query->Active = false; Query->Active = true;

---

De cette façon les données sont mises à jour. Mais ma méthode est un peu violente. Si je fais

Code:

---

1 2	Query->Refresh();

---

J'ai un message d'erreur s'il n'y a plus de lignes dans la table.

Si quelqu'un voit une solution :oops:

Merci d'avance

Tu as essayé avec un Requery() plutôt ? Le problème est que tu perds l'enregistrement en cours si tu as encore des lignes.

Voici ce que j'utilise:

Code:

---

1 2 3 4 5 6 7 8 9

dbRecords->Post(); // Save changes   // Update changes TBookmark oldRec=dbRecords->GetBookmark(); dbRecords->Requery(TExecuteOptions()); if (dbRecords->BookmarkValid(oldRec)) { dbRecords->GotoBookmark(oldRec); dbRecords->FreeBookmark(oldRec); }

---