Ver Mensaje Individual
  #1  
Antiguo 10-09-2007
Avatar de vroa74
vroa74 vroa74 is offline
Miembro
 
Registrado: jul 2006
Posts: 254
Reputación: 18
vroa74 Va por buen camino
Question campo validado no acepta ctrl + v ctrl + c

Buen día:

valide varios campos dentro de un programita que estoy haciendo ahora me topo que no puedo copiar y pegar datos.

con esta funcion valide, la oncontre en este foro va en OnKeyPress

Código Delphi [-]
 
function TForm1.PresskeyAlf(Key: Char):char;
  begin
       if ( StrScan('abcdefghijklmnñopqrstuvwxyzABCDEFGHIJKLMNÑOPQRSTUVWXYZáéíóúÁÉÍÓÚ -',Key) <> nil ) or
          ( Key = Char(VK_BACK) ) then
                begin    // procedimiento
                end else
                Key := #0;
        result:=Key;
  end;// fin del procesiminento

Siento que me hace falta algo ya sea en el mismo evento o quizas en OnKeyDown alguien me puede ayuda con el problema.

----------------------------------------------------------------------------------------------------------------------------
He buscado en el foro y no he encontrado nada que de solucion a mi problema.
tengo campos tedit, tdbedit, tmemo, loas cuales estan validados y hasta el momento no encuntro como poder hacer que acepten el copiar pegar y cortar.

Porfavor ayuda.

sigo intentando y probado mas metodos.

Última edición por vroa74 fecha: 11-09-2007 a las 03:33:57. Razón: no hay ayuda, pretendo ser mas claro
Responder Con Cita