Cirec
Messages postés3833Date d'inscriptionvendredi 23 juillet 2004StatutModérateurDernière intervention18 septembre 202250 10 févr. 2006 à 12:45
Salut,
pour empêcher l'action de ces touches tu fais :
procedure TForm1.DBMemo1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
beginif (Key vk_return) and (ssCtrl in shift) <gras>Then Key :</gras> #0;
end;
Remarque que cette fois on utilise l'évènement OnKeyDown ce qui permet dès la pression sur la touche de pouvoir l'annuler mais uniquement dans le cadre de la combinaison de touches donc Enter tout seul fonctionne toujours
@+
Cirec