Procedure TWPSpeedButton.SetImageNr(x:TWPImageIndex)Unit: WPTbarClass: WPTbar.TWPSpeedButtonParameters x:TWPImageIndex