Имитация Tab
Материал из DRKB
Имитация Tab[править | править код]
SelectNext(Screen.ActiveControl, True, True);
Разместите приведенный код в обработчике одного из событий. SelectNext - защищенный метод TWinControl со следующим прототипом:
procedure SelectNext(CurControl: TWinControl; GoForward, CheckTabStop: Boolean);
Так как форма также является потомком TWinControl, то она имеет доступ к защищенным методам.
Source: Взято с http://delphiworld.narod.ru
ID: 00362
ID: 01483