delphi中richedit实现撤消操作 (2000年8月9日).txt

自己对DELPHI学习的一点体会

Delphi中RichEdit实现撤消操作 (2000年8月9日) 

本站更新  分类:   作者:(上海汪箴)  推荐:   阅读次数:514  
(http://www.codesky.net)  

--------------------------------------------------------------------------------

对于memo来说，实现undo是不需编程的，只要让popupmenu属性为空，运行时就能用
鼠标右键激活一个常用操作菜单，其中包括撤消、剪切、复制、粘贴、删除和全选六项。
但可惜的是，这一招对于功能强大的RichEdit控件居然行不通，害得我们还要自己设计一
个popupmemu。当你用CutToClipBoard等语句轻松而顺利地完成了"剪切"等功能，接着
便会无奈地发现，竟找不到undo或cancel之类的语句来执行"撤消"。
这时你需要这样处理：
RichEdit1