Procedure TWPCustomToolCtrl.OnColorDropDown(Sender:TObject)Unit: WPCTRRichClass: WPCTRRich.TWPCustomToolCtrlParameters Sender:TObject