function GetTopParent: TControl 

Возвращает компонент, который является основным родителем (который не имеет родителя).