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