请问DELPHI里怎么实现按钮点击就按下,再点弹起的功能,就跟现实中那种带锁的按钮一样,