Cuando undo enter me suena un pito

[Michel]

Cuando Presiono la tecla enter para salir del control me suena un pito este es el codigo q tengo.


procedure TForm1.cxCurrencyEdit1KeyPress(Sender: TObject; var Key: Char);
begin
if (key=#13) then
perform(WM_NEXTDLGCTL,0,0);
end;

Como hacer para q no suene

Gracias....................

:d

[delphi.com.ar]

http://www.clubdelphi.com/foros/show...ghlight=PITIDO

[mpedra]

Tienes que colocar key:=#0 antes del perform

Salu2