Отлов нажатий в Delphi и оператор Case

[Athebest]

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

убрать фокус ввода с Edit

Подскажите пожалуйста, как это сделать

[Athebest]

Нужно, чтобы фокус после ввода числа и нажатия Enter переходил на Form1.
Задаётся в процедуре KeyPress того окна, куда вводим или где?

[_Engine_]

if key = #13 then ДругойКонтрол.SetFocus;

[Athebest]

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

if key = #13 then ДругойКонтрол.SetFocus;

Всё равно продолжает вводить и не переводит фокус

[Athebest]

Что делать, если ругается на несовместимые типы?

begin

   case Key of
   's': lbl1.Caption:='Синус= ' + Sin(StrToInt(edt1.Text));
   'c':  lbl1.Caption:='Косинус= ';
   't':   lbl1.Caption:='Тангенс= ' ;

[_Engine_]

Видимо надо привести типы в соответствие