Evenement avec changement d'enregistrement

**SegmentationFault** · 13/08/2004, 13h04

Bonjour,

J'ai un DBGrid et quelques DBEdit qui sont tous liés à la même DataSource.

Je veux lancer une fonction quand je passe d'un enregistrement à l'autre dans le DBGrid mais pas lorsque je change la valeur d'un DBEdit.

J'ai essayé OnDataChange avec la condition "if Field = nil" mais ca fonctionne parfois et parfois pas!!!!

Vous avez une idée svp? Merci d'avance

**cyril** · 13/08/2004, 15h05

Bonjour,

Tu peux lancer ta fonction ou procédure dans l'évenemet AfterScroll de ta table ou de ta requête.

A+
CYril

Tu aurais poster dans le forum Delphi/Base de données

**SebCBien** · 13/08/2004, 15h06

D'un enregistrement à l'autre ou d'une colonne à une autre.

C'est pas pareil.

Pour un changement de colonne, l'évenement OnColExit de la grille convient :

Code :

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

1
2
3
4
procedure TMainForm.MaGrilleColExit(Sender: TObject);
begin
  if (MaGrille.SelectedField.FieldName='NomDuChamp') then ...
end;

Pour un changement d'enregistrement, utiliser l'évenement BeforeScroll de la table :

Code :

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

1
2
3
4
procedure TMainForm.MaTableBeforeScroll(DataSet: TDataSet);
begin
...
end;

**delphi-fan** · 13/08/2004, 15h07

Ca dépend de la manière dont tu navigues dans ton DBGrid : au clavier tu peux gérer OnKeyDown ou Up , à la souris le OncellClick , ou comparer SelectedRow avec l'index de ta précedente sélection ...

A+