Имитация 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