Find which control is the top parent (ie ultimate ancestor)
Source position: controls.pp line 1318
public function TControl.GetTopParent: TControl;