锌价影响因素:如何在RichTextBox中实现“撤消(Undo)”功能

来源：百度文库编辑：神马品牌网时间：2024/04/29 18:31:49

我在网上搜索到这样一段代码，不知道如何使用
它说定义该在那里定义？？如何使程序按下“撤消”键就能产生效果？？
望高手不吝赐教，如果有其它好的代码，也想领教。

下面的办法不但适用于RichTextBox，也适合于TextBox。
先加入以下定义：
Const EM_CANUNDO = &HC6
Private Declare Function SendMessage Lib "User32" Alias _
"SendMessageA" _
(ByVal hWnd As Long, _
ByVal wMsg As Long, _
ByVal wParam As Long, _
ByVal lParam As Long) As Long
Const EM_UNDO = &HC7
然后使用
SendMessage RichTextBox1.hWnd, EM_UNDO, 0&, 0&
就可以实现Undo功能。
你也可以使用
lRet = SendMessage(RichTextBox1.hWnd, EM_CANUNDO, 0&, 0&)
来决定是否可以进行Undo操作。如果返回1表示可以。

我在c＃中使用richtextbox的时候用一个方法就搞定了。
richTextBox1.Undo();

如何在RichTextBox中实现“撤消(Undo)”功能 richtextbox这个控件中，复制剪切粘贴如何实现？？有办法在RichTextBox中实现超链接吗? 在vb6.0中如何用richtextbox实现书签功能 VFP中如何实现撤消操作谁有richtextbox中实现查找替换的代码怎么在richTextBox中加入文本链接???? vb中怎样在richtextbox中进行简单的排版? VC++中怎么实现撤消功能? 有办法在RichTextBox中显示图片吗?