在DELPHI程序里怎么实现取消按钮的功能,就是我点击一个按钮就相当我用了Ctrl+Z的撤销上一个动作,我要的不是从ModalResult属行里设置