TEdit und OnKeyDown

[Amateurprofi]

Ich verwende bei einem TEdit oft OnKeyDown um die Eingaben des Anwenders zu überwachen.
Zum Beispiel im OnKeyDown :
if key=vk_Decimal then key:=Ord('.'); bewirkt, daß ein '.' ausgegeben wird, wenn die Dezimalzeichen-Taste des Numpads gedrückt wird.

Das funktioniert normalerweise perfekt.

Zur Zeit habe ich ein Projekt bei dem das nicht funktioniert, weder bei TMemo- noch bei TEdit-Komponenten.
Selbst wenn ich in den jeweiligen OnKeyDowns key:=0 setze, wird das ignoriert, d.h. das TEdit nimmt fröhlich alles an was getippt wird.

Hat jemand eine Idee, was die Ursachen sein können ?