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