エレメントを Bitmap オブジェクトに変換

 2016/9/1 (木)    

Dim pBitmap As Bitmap = New Bitmap(width, height)
Dim pGraphics As Graphics = Graphics.FromImage(pBitmap)
Dim pDisplay As IDisplay = New SimpleDisplayClass()
pDisplay.StartDrawing(pGraphics.GetHdc().ToInt32, CShort(esriScreenCache.esriNoScreenCache))
Dim pElement As IElement = pGraphicsContainerSelect.SelectedElement
pElement.Draw(pDisplay, Nothing)
pDisplay.FinishDrawing()
pGraphics.ReleaseHdc()

Copyright© WINGFIELD since1981 , 2018 All Rights Reserved.