Ver Mensaje Individual
  #1  
Antiguo 08-06-2004
aram2r aram2r is offline
Miembro
 
Registrado: ene 2004
Posts: 81
Reputación: 21
aram2r Va por buen camino
Post Bip en un Edit

Hola amigos tengo un problema q es algo molesto, tengo un Edit en un form sin bordes...y lo muestro con un showmodal de modo q parece q solo aparece un Edit ya q el form no se ve....y en el evento OnKeyPress del Edit le he pesto q si pulsas Escape o Intro cierre el form.....pero cada vez q hago esto no se xq hace un Beep...y cuando lo escuchas unas cuantas veces llega a ser molesto...... Xq se produce este Beep? y como puedo evitarlo? El codigo es el siguiente:

Código Delphi [-]
procedure TFormBuscar.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Key=#13 then 
    Close
  else if Key=#27 then
    Close;
end;
Responder Con Cita