[xixadi]

Как мне сделать так, чтобы в программе компонент TEdit терял фокус ввода при нажатии Enter.

[pesi]

Код:

procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
if key = VK_RETURN then
edit2.SetFocus;
end;

[xixadi]

А если у меня только один Edit1, и что-бы не было звука ошибки можно?

[Crack502]

Сообщение от xixadi

А если у меня только один Edit1, и что-бы не было звука ошибки можно?

Можешь создать второй и скрыть его...

[dr. F.I.N.]

Applacation.ActiveControl := nil;