SoloCodigo

Programación General => Delphi => Mensaje iniciado por: h20_mx en Sábado 20 de Agosto de 2005, 07:35

Título: Quitar Ciertos Sonidos
Publicado por: h20_mx en Sábado 20 de Agosto de 2005, 07:35
hola nuevamente, necesito que alguien me ayude con el siguinte caso

tengo varios edit en una forma y me muevo por ellos con el enter(al presionar enter) con este codigo: if key=#13 then edit1.setfocus pero siempre me emite un beep automatico y crean que despues de usar el programa todos los dias como que fastidia,

y bueno quiero ver si puedo quitar ese sonido sin apagar las bocinas que es la unica forma que lo he solucionado hasta ahora. MUCHAS GRACIAS. h2o_mx@hotmail.
Título: Re: Quitar Ciertos Sonidos
Publicado por: Amilius en Sábado 20 de Agosto de 2005, 15:30
Lo correcto es agregar en el manual de usuario la forma que pueden cambiar o anular el sonido que emite windows en ciertos casos. En mi caso tengo anulados casi todos los sonidos, menos unos cuantos.
Título: Re: Quitar Ciertos Sonidos
Publicado por: CCesar en Domingo 21 de Agosto de 2005, 03:53
Hola, también puede utilizar "key :=#0" con esto quita el sonido, quedría algo así:
Código: Text
  1.  
  2.   if key = #13 then begin
  3.     Key := #0;
  4.     Edit2.SetFocus;
  5.   end;
  6.  
  7.  
Título: Re: Quitar Ciertos Sonidos
Publicado por: h20_mx en Domingo 21 de Agosto de 2005, 05:32
Muchas Gracias Amilius y CCesar por responder a mi problema, yo creo que no se podran quitar algunos sonidos, pero el que mas me interesaba era ese, por que era una lata, se soluciono con key:=#0, Muchisimas Gracias Nuevamente y hasta luego. :hola: