Discussion :

[jenteldz47]

Salut ttm,
j'ai un champ numérique dans une dbgrid, je veux obliger l'utilisateur à mettre une valeur même un zéro et ne pas laisser la cellule vide, comment je puisse contrôler le contenu de la cellule quand l'utilisateur déplace le cusseur vers une autre cellule, et remmetre le curseur sur la même cellule s'il y a une erreur de saisie. Merci d'avance

[defluc]

Avec OnCellClick, on peut tester si c'est bien la colonne dans laquelle l'utilisateur doit entrer une valeur numérique.
Avec OnKeyPress, on peut tester si la cellule comporte bien une valeur numérique.

[hocine]

salut,
puisque c'est un dbgrid, vous n'avez qu'a ajouté un code a son dataset évenement onnewrecord affecter la valeur 0 à votre chemp.
Bonne chance.
Merci.

[evarisnea]

la solution semble se trouver du coté de TxxField et de son évènement OnValidate.
voir du coté de l'aide de delphi pour cet objet.

[aityahia]

la solution semble se trouver du coté de TxxField et de son évènement OnValidate.
voir du coté de l'aide de delphi pour cet objet.

Je suis d'accord avec evarisnea il faut éviter de faire des control au niveau des control mais au niveau des tables. par exemple un test de validation de suppression il faut le mettre dans l'événement OnBeforeDelete de tables et non sur l'événement on Click du bouton

[evarisnea]

merci aityahia

je suis d'accord avec evarisnea il faut éviter de faire des controls au niveaus des controls mais au niveaus des tables. par exmpele un test de validation de suppression il faut le mettre dans l'évenement OnBeforeDelete de tables et non sur l'evenement onClick du bouton

cela a l'avantage de centraliser la gestion des évènements sur le jeu de données. et de plus on peut facilement passer outre de ces gestionnaires avec du code comme:

Code :

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

1
2
3
4
5
6
7
8
9
//sauvegarde
OldBeforeDelete := TDataSet.OnBeforeDelete;
//désactivation
TDataSet.OnBeforeDelete := nil;
...
//traitement
...
//restauration
TDataSet.OnBeforeDelete := OldBeforeDelete;

[jenteldz47]

Salut Ttm,
evarisnea a dit:
la solution semble se trouver du coté de TxxField et de son évènement OnValidate.
Quand on change une valeur dans une cellule de Dbgrid, l'evènement 'Ovalidate' de TxxField n'est jamais déclaché!!!! même aprés 'post' de la table reliée à Dbgrid.
je veux un evènement qui se déclanche aprés la saisie d'une valeur dans une cellule et la façon de remetre le curseur à la cellule concernée s'il y a erreur de saisie. merci d'avance.

[evarisnea]

Quand on change une valeur dans une cellule de Dbgrid, l'evènement 'Ovalidate' de TxxField n'est jamais déclaché!!!! même aprés 'post' de la table reliée à Dbgrid.
je veux un evènement qui se déclanche aprés la saisie d'une valeur dans une cellule et la façon de remetre le curseur à la cellule concernée s'il y a erreur de saisie. merci d'avance.

regarde la source que j'ai jointe à mon post.
voir l'aide delphi pour plus d'informations

PS:il faut utiliser la balise quote (le carré jaune sur la barre d'outils à droite) pour citer un membre

[jenteldz47]

Salut ttm,
Merci Infiniment Evarisnea pour votre efficace méthode sa marche comme sur des roulettes.
la dérnière fois j'ai changé la valeur d'une autre colonne que celle visée, pour cela l'evenement n'est pas généré.Mérci une autre fois.

[evarisnea]

Salut ttm,
Merci Infiniment Evarisnea

de rien