如何用VCL机制来处理一个TEdit的WM_PASTE消息？

我查看了VCL的源程序，VCL对消息WM_PASTE并没有做任何处理，对消息
WM_PASTE的处理，是由Windows的缺省的处理函数来处理的。如果你不想
用SetWindowLong来重载TEdit的消息处理函数WndProc的话，就只有自己
由TEdit派生一个控件，在控件里响应消息WM_PASTE了。除此之外，我想
没有其它的方法。