Delphi Clipbrd剪贴板监视程序.rar

Delphi 剪贴板监视，这里使用了Delphi中的 Clipbrd操作类，可监视复制到剪贴板中的数据，只要有复制的操作，复制的文字就会自动显示在监视器文本框中，如运行截图所示，文本框会显示任意复制到剪贴板中的数据，不过只能纯文字型内容，图片类和文档类内容不能被监控。关键代码可参考如下： 　　message.Result := SendMessage(WM_DRAWCLIPBOARD, NextViewerHandle, 0, 0); 　　if (Clipboard.HasFormat(CF_TEXT) or Clipboard.HasFormat(CF_OEMTEXT)) then 　　begin 　　 Memo1.Clear; 　　 Memo1.Text:=Clipboard.asText; 　　end;