Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 04-10-2008
Avatar de Juampa
Juampa Juampa is offline
Registrado
 
Registrado: ago 2004
Ubicación: Esperanza-Santa Fe-Argentina
Posts: 1
Poder: 0
Juampa Va por buen camino
Post Eliminar beep en OnKeyDown al usar VK_RETURN

Nota: no es una pregunta en si misma, porque de alguna manera lo solucioné.

Hace un tiempo escribí un programa del que no me di cuenta de una característica: El siguiente código hace que suene un beep en Windows

Código Delphi [-]
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
  if Key=VK_RETURN then Button1.Click;
end;

Usaba Windows sin sonidos y de ahí que este detalle se me había pasado... es espantoso ese comportamiento.

El "ruidito" lo termine sacando implementando lo siguiente:

Código Delphi [-]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
 if Key=#13 then Key:=#0
end;

Espero que le sirva a alguien. Disculpen si ya figuraba en el foro, no lo pude encontrar en mis búsquedas.
Responder Con Cita
 



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
beep en showmodal coso Varios 2 12-07-2008 00:13:07
Desactivar beep en mi aplicacion Kenobi Varios 3 01-06-2007 23:59:47
Pierdo el foco al usar F4 en ONKEYDOWN Ericato Varios 2 09-03-2007 18:35:57
Eliminar Beep en Evento OnKeyPress JELIRM Varios 2 12-04-2006 01:36:28
OnKeyDown Mhil Varios 5 29-12-2005 04:36:19


La franja horaria es GMT +2. Ahora son las 12:04:39.


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