TPopupNotifier

pl 

OnClose

TComponent

TPersistent

TObject