Index: AAPClient/UI/DnaCodeScherm.dfm
===================================================================
diff -u -r79 -r80
--- AAPClient/UI/DnaCodeScherm.dfm	(.../DnaCodeScherm.dfm)	(revision 79)
+++ AAPClient/UI/DnaCodeScherm.dfm	(.../DnaCodeScherm.dfm)	(revision 80)
@@ -75,7 +75,7 @@
     Height = 27
     CharCase = ecUpperCase
     TabOrder = 2
-    OnKeyDown = edtDnaCodeKeyDown
+    OnKeyPress = edtDnaCodeKeyPress
   end
   inherited btnRechtsOnder: TButton
     TabOrder = 3