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