5 respuestas en este tema

[enecumene]

Pues como reza el título, ¿hace sabe cómo solucionar eso?.

Saludos.

[seoane]

Asi:

delphi

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Key = #13 then
    Key:= #0;
end;

[Fenareth]

Asi:

delphi

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Key = #13 then
    Key:= #0;
end;

Y así eliminamos el sonido pero aún capta el ENTER ? 

[enecumene]

¿Tan sencillo?, ¡Hostia! , gracias seoane .

Saludos.

[egostar]

Y así eliminamos el sonido pero aún capta el ENTER ? 

Bueno, acuerdate que el Enter en un Edit es NO funcional

Salud OS

[Fenareth]

Y así eliminamos el sonido pero aún capta el ENTER ? 

Bueno, acuerdate que el Enter en un Edit es NO funcional

Salud OS

Yo lo decía porque por ejemplo yo tengo algo así:

delphi

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Key = #13 then
    // Pasa el foco a otro componente
end;

... y como en ese caso qué ?, tendría que ser ?....

delphi

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if Key = #13 then
  begin
      // Pasa el foco a otro componente
      Key:= #0;
  end;
end;