程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> C語言 >> C++ >> 關於C++ >> 判別剪貼板上所有可用的格式

判別剪貼板上所有可用的格式

編輯:關於C++

注:此文中程序原為VB書寫.老妖改為CB版.

如果你想知道剪貼板上是否包含來自excel的數據,或者你想判別rich text格式是否可用以激活粘貼菜單時,以下程序可以告訴你如何判別當前剪貼板上所有可用的格式,包括自定義格式。

// Unit1.cpp 開始-----------------
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//已知的剪貼板數據格式如下:
char *strClipboardFormats[17]={"cf_text","cf_bitmap","cf_metafilepict","cf_sylk",
              "cf_dif","cf_tiff","cf_oemtext","cf_dib","cf_palette",
              "cf_pendata","cf_riff","cf_wave","cf_unicodetext",
              "cf_enhmetafile","cf_hdrop","cf_locale","cf_max"};
//獲取自定義數據格式的名稱
String GetUnknownFormatName(long lFormatID);
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
     : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  int lr;
  int icount;
  ListBox1->Items->Clear();
 
  if(OpenClipboard(Handle))
  {
   try
   {
    lr=EnumClipboardFormats(0);
    if(lr!=0)
    {
     do
     {
      icount++;
      if(lr<18)
       ListBox1->Items->Add(strClipboardFormats[lr]);
      else
       ListBox1->Items->Add(GetUnknownFormatName(lr));
      lr = EnumClipboardFormats(lr);
     }while(lr!=0);
    }
   }
   catch(...)
   {
    CloseClipboard();
   }
  }
  CloseClipboard();
}
//---------------------------------------------------------------------------
String GetUnknownFormatName(long lFormatID)
{
  //對於自定義格式,我們可以向剪貼板要注冊過的名字:
  char strBuf[255];
  long lr;
  lr = GetClipboardFormatName(lFormatID,strBuf,255);
  if(lr!=0)
   return String(strBuf);
  else
   return "-----None-------"; 
}
//---------程序結束--------------------

當你點擊按鈕後,當前所有可用的剪貼板數據格式將會添加到ListBox中。列表區被設為格式名,每一行的數據被設為剪貼板格式的id。要在列表中看到自定義格式,試試在點擊按鈕之前,從Word、寫字板或IE中復制一些東西。

---測試環境:W2k ADV Server + sp3

BCB 6.0 + sp3

  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved