Source position: controls.pp line 1182
protected procedure TControl.DoOnParentHandleDestruction; virtual;
implement in descendants