Delphi - база знаний


Имитация Tab


Имитация Tab




SelectNext(screen.ActiveControl,True, True);




Разместите приведенный код в обработчике одного из собитий. SelectNext - защищенный метод TWinControl со следующим прототипом:



procedure SelectNext(CurControl: TWinControl;
GoForward, CheckTabStop: Boolean);




Так как форма также является потомком TWinControl, то она имеет доступ к защищенным методам.

Взято с





Начало  Назад  Вперед