![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Переход по окнам формы [D6, 95/98]
Рубей © (2005-12-27 08:12:00)Вопрос от новичка знающим и умеющим. Если на форме ввода есть несколько компонентов EDIT, COMBOBOX, то как сделать чтобы переход из окна в окно осуществлялся по нажатию кл. ENTER , а не кликом мышки. При этом желательно, чтобы курсор ходил по кругу, т.е. возвращался из последнего окна в начальное.
Заранее благодарен за возможные советы.
msguns (2005-12-27 10:06:00) [1]Еще проще определить Action, которому назначить ShortKey='Énter', в обработчике которого посылать форме нажатие Tab. Порядок "перебора" контролов определить св-вом Taborder
Offceman (2005-12-27 08:29:00) [2]Просто напиши в событии KeyPress каждого компонента. Например:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if (Key = #13) then ComboBox1.SetFocus();
//если нажали Enter то меняем фокус ввода.
end;