Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 16-04-2009
paul170185 paul170185 is offline
Miembro
 
Registrado: mar 2008
Posts: 24
Poder: 0
paul170185 Va por buen camino
Exclamation Mensaje al dejar presionada una Tecla

Hola que tal tengo una gran duda..... haver si me pueden ayudar o decirme cual es el codigo, para que dentro de un grid, si dejo la tecla "control" presionada a los 3 o 4 segundos me mande un mensaje de que la "la tecla control esta presionada", obviamente si la presiono una vez y no la dejo presionada que no me mande ningun mensaje ..... espero me puedan ayudar, gracias!!!
Responder Con Cita
  #2  
Antiguo 16-04-2009
Avatar de Alexandro
Alexandro Alexandro is offline
Miembro
 
Registrado: mar 2008
Ubicación: Mayarí Holguín Cuba
Posts: 127
Poder: 17
Alexandro Va por buen camino
Cool

hola paul170185:
Mira, lo que quieres es bastante sencillo. En tu form pon un grid, y un timer.
en el evento OnKeyDown del grid pones este codigo:
Código Delphi [-]
if Key=17 then  timer1.Enabled:=true;
Aqui lo que haces es tomar el valor Ascii de la tecla Crtl de la izq que es 17 y compararlo.
Ahora en el OnTimer pones esto:
Código Delphi [-]
inc(tiempo);
 if tiempo=4 then
               begin
                 timer1.Enabled:=false;
                 ShowMessage('4 segundos presionada.');
                 tiempo:=0;
               end;
tiempo es una variable de tipo byte y es global.
Y para finalizar agregas esto en el evento OnKeyUp del Grid:
Código Delphi [-]
tiempo:=0;
Espero que te sirva.
Suerte.
__________________
Cuando las cosas van mal, recuerda que aún pueden ir peor
Responder Con Cita
  #3  
Antiguo 16-04-2009
paul170185 paul170185 is offline
Miembro
 
Registrado: mar 2008
Posts: 24
Poder: 0
paul170185 Va por buen camino
me funciono

Mil gracias, me funciono muy bien, en serio mil gracias!!!
Responder Con Cita
  #4  
Antiguo 16-04-2009
paul170185 paul170185 is offline
Miembro
 
Registrado: mar 2008
Posts: 24
Poder: 0
paul170185 Va por buen camino
Unhappy -----

mmmm, oie funciona pero si presiono una vez la tecla y la suelto me aparece el mensaje despues de cuatro segundos , yo nada quiero que me aparesca el mensaje si alos 4 segundos sigue presionada la tecla esto es que no la has soltado, por que si presiono una vez la tecla control y la suelto en menos de los 4 segundos de todos modos me manda el mensaje
Responder Con Cita
  #5  
Antiguo 16-04-2009
paul170185 paul170185 is offline
Miembro
 
Registrado: mar 2008
Posts: 24
Poder: 0
paul170185 Va por buen camino
Oie si funciona, pero.... yo quiero que si el usuario tiene la tecla control pulsada y no quita su dedo alos 4 segundos le mande el mensaje, pero si la presiona y la suelta en menos de los 4 segundos no quiero que me aparesca el mensaje
Responder Con Cita
  #6  
Antiguo 16-04-2009
Avatar de Alexandro
Alexandro Alexandro is offline
Miembro
 
Registrado: mar 2008
Ubicación: Mayarí Holguín Cuba
Posts: 127
Poder: 17
Alexandro Va por buen camino
Talking

Disculpa, lo habia olvidado, agregas esto en el evento OnKeyUp del Grid tambien:
Código Delphi [-]
timer1.enabled:=false
__________________
Cuando las cosas van mal, recuerda que aún pueden ir peor
Responder Con Cita
  #7  
Antiguo 16-04-2009
paul170185 paul170185 is offline
Miembro
 
Registrado: mar 2008
Posts: 24
Poder: 0
paul170185 Va por buen camino
Muchas gracias, me funciono perfectamente , gracias por ayudarme en serio
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Tecla presionada continuamente tonyluna36 Varios 3 04-06-2007 18:33:45
Medir fuerza de una tecla presionada en java rls JAVA 6 08-04-2007 02:35:00
Tecla presionada en un formulario Dexter182 Varios 5 15-07-2005 04:33:16
Emular Tecla Insert Presionada marceloalegre Varios 1 31-05-2005 18:32:51
Reconocer Tecla Presionada arturoconde Oracle 0 22-03-2005 16:48:40


La franja horaria es GMT +2. Ahora son las 14:11:36.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi