TEDIT FOCUS & CARET

У меня есть два контроля тедута. Когда я вкладурую из редактирования1, Редактировать2 получает фокус. На моем мероприятии unexit of edit1 У меня есть следующий код:

procedure TForm1.Edit1Exit(Sender: TObject);
begin
  edit2.Enabled := false;
  edit2.Enabled := true;
  edit2.setfocus;
end;

edit2 имеет фокус. Однако в нем нет карета. Я могу начать печатать, но это запутано, как я не знаю Какой контроль имеет фокус.

Я больше интересует то, что с переводом Включена имущество, которое вызывает некоторые сообщения не стрельба правильно? Например, мероприятие Edit2 не вызывается

Это на D2006, если это важно вообще.

Спасибо за ответ.