Déplacement dans un DBGrid

Salut tlm
J'ai un petit problème dans mon dbgrid car je n'arrive pas à faire un déplacement d'un enregistrement à l'autre avec les flèches du clavier et j'ai rien ajouté dans l'événement du dbgrid. j'ai essayé aussi d'ajouter un code que j'ai trouvé sur le net pour réaliser un déplacement avec la touche entrée mais ça ne marche pas.
voilà le code:

Code:

---

1 2 3 4 5 6 7 8 9

if key=13 then if dbgrid.selectedindex<dbgrid.columns.count-1 then dbgrid.selectedindex:=dbgrid.selectedindex+1 else if not dbfid.dataset.eof do begin dbgid.dataset.next; selectindex:=0; end;

---

merci pour votre aide

Salut

Ce code est censé déplacer la focalisation de cellule en cellule de la gauche vers la droite puis, la dernière colonne atteinte, passer à la ligne suivante.

Celui-ci devrait mieux fonctionner. A placer dans l'évènement OnKeyPress du DBGrid:

Code:

---

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

procedure TFormTest.DBGrid1KeyPress(Sender: TObject; var Key: Char); begin if Key = Chr(VK_RETURN) then begin with TDBGrid(Sender) do begin if SelectedIndex < Columns.Count then SelectedIndex := SelectedIndex + 1 else if not DataSource.DataSet.Eof then begin DataSource.DataSet.Next; SelectedIndex := 0; end; end; end; end;

---

@+ Claudius

Cl@udius
ok je ferai un essai
merci

Salut après la compilation Delphi m'a déclaré une erreur dans la ligne

Code:

---

with TDBGrid(Sender) do

---

l'erreur: operateur ou ; manquant.

Citation:

---

Envoyé par youhibadelphi

J'ai un petit problème dans mon dbgrid car je n'arrive pas à faire un déplacement d'un enregistrement à l'autre avec les flèches du clavier et j'ai rien ajouté dans l'événement du dbgrid

---

Le déplacement avec les touches de déplacement dans un DBGrid n'est-il pas automatique ?

Just-Soft
Oui je ne sais pas c'est quoi le problème, j'ai rien ajouter dans la liste d'événement du dbgrid