Как правильно сделать Edit в фокусе?

[Dux]

Открываю форму модально Form1.Showmodal; пишу Edit1.SetFocus, однако курсор в нем не появляется. А если открывать форму просто Form1.Show; тогда как обычно отображается и мигает. В чем проблемма с модальным окном не ясно.

[evg_m]

Form1.Showmodal;
ВЕесь последующий код будкт выполнен ПОСЛЕ ЗАКРЫТИЯ.
Edir1.SetFocus; //ПОСЛЕ закрытия

Form1.Show;
показываем и НЕ останавливаясь проходим дальще.
Edir1.SetFocus; //сразу после показа

можно на событие Onactivate повесить

procedure TForm1.OnActivate(sender: Tobject);
begin
  Edit1.SetFocus;
end;

можно еще очень неуклюжий костыль.

form1.show;
edir1.setfocus;
form1.hide;
form1.showModal;

[chertovich]

При вызове модальным способом, прекращается исполнения кода до закрытия этой формы. Поэтому устанавливайте фокус в событии OnShow формы или в редакторе свойств

[NetSpace]

Иногда после разворота формы фокус ввода уходит на другой элемент формы, поэтому я в таких формах стараюсь делать один-единственный Edit, чтоб фокус не терялся. А другие компоненты либо скрываю, либо обхожусь без них

[Аватар]

Если аккуратно пользоваться свойством TabOrder компонентов, то никаких SetFocus не надо. Исключение PageControl - если он активизируется первым при развороте формы, то фокус попадает на заголовок TabSheet