怎樣將GIS圖形復制到Windows剪貼板，粘貼到Word中

很久沒寫隨筆了，有點想關了這個博客，不再更新，但還是沒有下定決心。趁這些天比較閑，發一個以前寫著玩的功能吧。
復制、粘貼功能是一件很簡單的事情，但怎樣將GIS圖形粘貼到word中呢？最簡單的思路還是將GIS圖形保存為Image形式，發送到 剪貼板 ，再粘貼到Word。但如果Image格式采用柵格的格式，如BMP或JPEG，則粘貼后在Word中拉伸時，效果會受到影響，比較合適的格式是采用WMF或EMF這種矢量的格式。將Visio格式復制到Word中時，可以看到就是這種效果，而且文字還是可以編輯的。好，下面我們就看看怎樣實現這個功能。

第一步當然是將圖形復制為一個MetaFile對象：

public MetafileGetGeometryMetafile(ISymbolpSymbol,IGeometrypGeometry)
{
// 先獲取一個IDisplayTransformation對象
IDisplayTransformationpDisTrans = new DisplayTransformationClass();
IEnvelopepEnv = pGeometry.Envelope;
Rectanglerect = new Rectangle( 0 , 0 , 500 , 500 );

tagRECTr;
r.left = rect.Left;
r.right = rect.Right;
r.bottom = rect.Bottom;
r.top = rect.Top;

pDisTrans.set_DeviceFrame( ref r);
pDisTrans.Bounds = pEnv;

pDisTrans.Resolution = 72 ;

pDisTrans.ReferenceScale = 1.0 ;
pDisTrans.ScaleRatio = 1 ;

// 創建WMF
MemoryStreamms = new MemoryStream();
Graphicsg = CreateGraphics();
IntPtrhdc = g.GetHdc();
Metafilemf = new Metafile(ms,hdc, new Rectangle( 0 , 0 , 500 , 500 ),MetafileFrameUnit.Pixel,EmfType.EmfPlusDual);
g.ReleaseHdc(hdc);
g.Dispose();
g = Graphics.FromImage(mf);

g.FillRectangle( new SolidBrush(Color.White), new Rectangle( 0 , 0 , 500 , 500 ));

pSymbol.SetupDC(( int )g.GetHdc(),pDisTrans);
pSymbol.Draw(pGeometry);
pSymbol.ResetDC();
g.ReleaseHdc();

g.DrawString( " bywatson " , this .Font, new SolidBrush(Color.Blue), new PointF( 20 , 20 ));

g.Save();
g.Dispose();

return mf;
}

第二步：發送到剪貼板：

測試 .... 什么，不成功？？
估計是.net不支持將metafile格式復制到剪貼板吧。
于是，用于搜索引擎，搜索一翻，在某國外論壇找到解決方案：

public class ClipboardMetafileHelper
{
[DllImport( " user32.dll " )]
static extern bool OpenClipboard(IntPtrhWndNewOwner);
[DllImport( " user32.dll " )]
static extern bool EmptyClipboard();
[DllImport( " user32.dll " )]
static extern IntPtrSetClipboardData( uint uFormat,IntPtrhMem);
[DllImport( " user32.dll " )]
static extern bool CloseClipboard();
[DllImport( " gdi32.dll " )]
static extern IntPtrCopyEnhMetaFile(IntPtrhemfSrc,IntPtrhNULL);
[DllImport( " gdi32.dll " )]
static extern bool DeleteEnhMetaFile(IntPtrhemf);

// Metafilemfissettoaninvalidstateinsidethisfunction
static public bool PutEnhMetafileOnClipboard(IntPtrhWnd,Metafilemf)
{
bool bResult = false ;
IntPtrhEMF,hEMF2;
hEMF = mf.GetHenhmetafile(); // invalidatesmf
if ( ! hEMF.Equals( new IntPtr( 0 )))
{
hEMF2 = CopyEnhMetaFile(hEMF, new IntPtr( 0 ));
if ( ! hEMF2.Equals( new IntPtr( 0 )))
{
if (OpenClipboard(hWnd))
{
if (EmptyClipboard())
{
IntPtrhRes = SetClipboardData( 14 /**/ /* CF_ENHMETAFILE */ ,hEMF2);
bResult = hRes.Equals(hEMF2);
CloseClipboard();
}
}
}
DeleteEnhMetaFile(hEMF);
}
return bResult;
}
}

調用 PutEnhMetafileOnClipboard 方法就可以了，
再測試....大功告成！

再看一看 PutEnhMetafileOnClipboard 中的代碼，比較特別的是 CopyEnhMetaFile函數，將MetaFile在內存中復制一份，看來是.net中的metafile與Windows中的metafile格式有一定出入，windows剪貼板不認識的緣故吧

來自:http://www.cnblogs.com/watsonyin/archive/2007/11/22/968651.html

怎樣將GIS圖形復制到Windows剪貼板，粘貼到Word中