Discussion :

[vad67]

Bonjour, quelqu'un aurait-il rencontré un problème avec l'utilisation de la fonction ord() dans le keypress d'un DBEdit. Le source ci-dessous ne fonctionne pas lors de la frappe de la touche Entrée ou de la touche Tab !

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
 
// Vérification des caractères
procedure TFMAE912Form.M_MTMVTKeyPress(Sender: TObject; var Key: Char); 
begin
  case Ord(key) of
  9 : begin
       Valider_912.SetFocus;
       end;
  13 : begin
       Valider_912.SetFocus;
       Valider_912Click(sender);
       end
  else verif_mt(key);
  end; // end case
 
end;

Merci de votre aide !

[seabs]

Bonjour,

Je pense que les touches Tab (9) et Return (13) n'arrivent pas à KepPress de ton DBEdit. D'après l'aide de Delphi 7, seuls les caractères ASCII sont pris en compte dans OnKeyPress, sauf peut-être Backspace (A contrôler).

Pour les touches indiquées, il faut utiliser OnKeyDown et/ou OnKeyUp.

Bon courage

[vad67]

Le return fonctionne bien avec Keypress par contre Tab ?
Mon problème avec le return c'est que j'avais un Button qui était resté avec default à true et qui reprenait la main dès l'appui de la touche entrée.
Pour le tab je vais changer l'ordre de tabulation pour ne pas me prendre la tête.
Merci ton aide.