Applies to
TWPXMLPropertyEditor

Declaration
procedure OKClick(Sender: TObject);