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