Ver Mensaje Individual
  #1  
Antiguo 19-06-2014
Jovalca Jovalca is offline
Miembro
NULL
 
Registrado: sep 2013
Ubicación: Madrid - España
Posts: 30
Reputación: 0
Jovalca Va por buen camino
Deshabilitar Drag and Drop de TEdit

Buenas Tardes Chicos.

Primero y como siempre, gracias por tomaros la molestia de dedicar 5 minutos a este tema.

Tengo un TEdit, el cual tengo controlado en OnKeyPress que solo se introduzcan números y una coma, ya que posteriormente este valor es sumado a otros tantos y sólo puede contener un valor numérico. Para evitar la acción de pegar, por si el contenido del portapapeles no es numerico, he deshabilitado con OnKeyDown las teclas Crtl+V, es decir, la acción de pegar. Ahora se me presenta otro problema, el drag&drop, porque si alguien arrastra un contenido no numerico a este edit, me lanza el error de que no es Float, ya que la suma se hace en el evento OnEditingDone.

He probado a poner Edit1.Clear en los eventos OnStartDrag, OnEndDrag, OnDragDrop... pero sigue aceptando el contenido arrastrado.

Hay alguna manera de controlar esto o deshabilitarlo de este edit o directamente del formulario entero?

Mil gracias por vuestra siempre útil ayuda.
Un abrazo.
Responder Con Cita