Michel
17-07-2003, 16:56:41
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
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