Procedure TWPSpeedButton.CMEnabledChanged(Message:TMessage)Unit: WPTbarClass: WPTbar.TWPSpeedButtonParameters Message:TMessage