Deshabilitar Drag and Drop de TEdit

[Jovalca]

Gracias por vuestras respuestas.

Conozco el componente, pero ya tengo la aplicación casi terminada y el reemplazar ahora todos los edit con estas características sería una locura. Para próximas tomo nota.
Para hacer lo que comentaba, si al cambiar detecta texto en vez de numero, que vacíe el tedio tengo algo como esto.

 if ( StrScan('0123456789,.') = nil ) then
Edit1.Clear;

Pero no compila, es evidente que no esta bien, que estoy poniendo mal?

Gracias de nuevo y un saludo.