ctrl+v / shift+insert
Hola:
Alguien sabe como se puede inhabilitar el pegado en un edit estoy haciendolo de la siguiente manera en el evento "KeyDown" escribiendo este código:
....
if ( (Shift = [ssCtrl]) and (Key = Ord('V')) ) OR
( (Shift = [ssShift]) and (Key = VK_INSERT) ) then
key := 0;
....
Pero en algunos casos no me funciona, alguien conoce otra manera.
|