哪里捕获wm_drawclipboard消息

哪里捕获wm_drawclipboard消息 procedure TOffice.SetClipboardHook;
{设置剪贴板查看器}
begin
ClipboardViewer:=SetClipboardViewer(GetModuleHandle(nil));
end;

procedure TOffice.StopClipboardHook;
{撤销剪贴板查看器}
begin
ChangeClipboardChain(GetModuleHandle(nil),ClipboardViewer);
end;

如果不是做EXCEL的外挂，而是普通的DELPHI的窗口我可以用下面的代码，来捕获wm_drawclipboard
procedure Change(var msg:Tmessage);message wm_drawclipboard;

捕获其wm_drawclipboard


　　　　　　　　　　　　　 查看评论 回复