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