Функция GetParentForm( Control: TControl ): TCustomForm;
Модуль: Forms
Описание
Возвращает потомка класса TCustomForm, содержащего средство управление Control. Если указанное средство управление не относится ни к какой из форм VCL (например, элемент ActiveX), то функция возвращает nil.