Bonjour;
J'ai un TDBGRID lié à un TADOTABLE.
Je savoir comment je peux gérer les champs non nuls lors de l'insertion des nouveaux enregistrements.Donc je veux bien capter l'exception et à afficher un message personnalisé à l'utilisateur au cas où il oublierait de renseigner un champ not null.
J'ai essayé dans l'évènement BeforePost de datasource mais ca marche pas
Voici mon code :
Merci
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20 procedure Tdatam.detailBeforePost(DataSet: TDataSet); begin try if DataSet.FieldByName('designation').IsNull then begin exit; end; except on E: Exception do begin showmessage('renseigner la designation' ); exit; end; end; end;
Partager