Переход по окнам формы

← →
Рубей (2005-12-27 08:12) [0]

Вопрос от новичка знающим и умеющим. Если на форме ввода есть несколько компонентов EDIT, COMBOBOX, то как сделать чтобы переход из окна в окно осуществлялся по нажатию кл. ENTER , а не кликом мышки. При этом желательно, чтобы курсор ходил по кругу, т.е. возвращался из последнего окна в начальное.
Заранее благодарен за возможные советы.

← →
Offceman (2005-12-27 08:29) [1]

Просто напиши в событии KeyPress каждого компонента. Например:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if (Key = #13) then ComboBox1.SetFocus();
//если нажали Enter то меняем фокус ввода.
end;

Еще проще определить Action, которому назначить ShortKey="Énter", в обработчике которого посылать форме нажатие Tab. Порядок "перебора" контролов определить св-вом Taborder

Переход по окнам формы Найти похожие ветки