Bonsoir
J'aimerais vérifier que mes champs soient bien remplis lorsque je clique sur le bouton Post d'un DBNavigator...
J'ai essayé plusieurs méthode avec DBNavigator1BeforeAction du genre :
Le souci, c'est que je n'arrive pas à STOPER la "transaction"... afin d'annuler l'Insert.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 procedure TForm1.DBNavigator1BeforeAction(Sender: TObject; Button: TNavigateBtn); begin if DBEdit3.text='' then begin showmessage ('champ vide'); end; end;
Merci de votre aide !







Répondre avec citation





Partager