【 tulaoshi.com - 编程语言 】
                             
                              在Form1的.h的private加上:
  void __fastcall ClipboardChanged(TMessage& Msg);
  在Form1的.h的public加上:
  BEGIN_MESSAGE_MAP
   MESSAGE_HANDLER(WM_DRAWCLIPBOARD,TMessage,ClipboardChanged)
  END_MESSAGE_MAP(TForm)
  在Form1的.cpp内加上:
  void __fastcall TForm1::ClipboardChanged(TMessage& Msg)
  {
   POINT MousePos;
   GetCursorPos(&MousePos);
   PopupMenu4-PopupComponent=Form1;
   PopupMenu4-Popup(MousePos.x,MousePos.y); //一有变化,就弹出一个菜单,复制,剪切或清除都能引发此函数
  }
  在Form1的.cpp内有一个ToolButton
  void __fastcall TForm1::ToolButton9Click(TObject *Sender)
  {
   static HWND LastHandle;
   static bool clip=false;
   if(clip==true)
   {
    ToolButton9-Down=false;
    ChangeClipboardChain(Form1-Handle,LastHandle); //结束监视
   }
   else
   {
    ToolButton9-Down=true;
    Clipboard()-Clear();
    Application-Minimize();
    LastHandle=SetClipboardViewer(Form1-Handle); //启动监视
   }
   clip=!clip;
  }