Procedure TDBWPRichText.DataChange(Sender:TObject)Unit: WpdbrichClass: Wpdbrich.TDBWPRichTextParameters Sender:TObject