GetActiveForm - это функция
Текущая Форма, имеющая фокус
GetActiveForm()
Полезные функции
Функции Delphi