在DEPHI中的TRichEdit组件，怎么把他的Ctrl+C和Crtl+V复制、粘贴功能屏蔽掉呀

Question

我设置了他的ReadOnly为True，可是还可以进行复制，是不是可以在他的KEYPRESS事件中对Ctrl+C和Crtl+V这2个键的组合屏蔽掉呀，可以的话怎么写呀，还有别的好的办法没有，就是让在TRichEdit组件中显示的内容不能进行复制。

Answer 1

enable设为false就行了，没有焦点当然不能复制。

Answer 2

private
    NextViewerHandle: HWND; { 下一剪贴板观察器的句柄 }
    procedure WMDrawClipboard(var Msg:TWMDrawClipboard);    message WM_DRAWCLIPBOARD;
procedure TMainForm.WMDrawClipboard(var Msg: TWMDrawClipboard);
begin If NextViewerHandle <> 0
  then
    SendMessage(NextViewerHandle,msg.Msg,0,0);  if 不能复制和粘贴的条件成立 then
  begin
    Clipboard.Clear;
    Msg.Result := 0;
  end; end;

Answer 3

在formcreate中:  
NextViewerHandle := SetClipboardViewer(Handle);