关于.net中使用axmschart控件editcopy方法的问题!

从AxmsChart复制图象到剪贴板然后再导出图片,出现错误代码如下:
Dim iBitmap As System.Drawing.Bitmap

AxmsChart1.Editcopy()
iBitmap =Clipboard.Getimage

错误信息如下:

检测到 FatalExecutionEngineError
Message: 运行库遇到了错误。此错误的地址为 0x7a005c3d,在线程 0xc98 上。错误代码为 0xc0000005。此错误可能是 CLR 中的 bug,或者是用户代码的不安全部分或不可验证部分中的 bug。此 bug 的常见来源包括用户对 COM-interop 或 PInvoke 的封送处理错误,这些错误可能会损坏堆栈。

我猜测可能是mschart迁移到到.net之后出现的问题,单独用editcopy没问题,用画板可以读取内存里

图片,用Clipboard.Getimage方法也没问题,但两者在一起就有问题,我估计可能editcopy方法

占了剪贴板(我还是不相信)?亦或者editcopy线程不安全?具体到现在我也不太清楚,反正就不能简单共存

(以前VB里就这么用的)。

我也试着从网友介绍的用单线程、提升权限角度解决问题,但都没成功。既然我发现使用完

editcopy方法后用windows自带的画板能读取,就联想到我用api函数来读取clipboard行不行呢?经过

测试后,发现果然可以,我用vb.net的代码写的过程,大家可以参考一下:


声明:
Private Const CF_BITMAP As Short = 2
Private Declare Function OpenClipboard Lib "user32" (ByVal hwnd As Integer) As

Integer
Private Declare Function GetClipboardData Lib "user32" (ByVal wFormat As Integer) As

Integer
Private Declare Function CloseClipboard Lib "user32" () As Integer

功能过程代码
Dim iBitmapPtr As Integer
Dim iBitmap As System.Drawing.Bitmap

Me.AxmsChart1.Editcopy()
OpenClipboard(Me.Handle.ToInt32)
iBitmapPtr = GetClipboardData(CF_BITMAP)
iBitmap = System.Drawing.Bitmap.FromHbitmap(iBitmapPtr)
If iBitmap Is nothing Then
MessageBox.Show("获取Chart图像失败!","消息",MessageBoxButtons.OK,

MessageBoxIcon.Error) Else Me.SaveFileDialog1.FileName = "" Me.SaveFileDialog1.Filter = "BMP文件(*.bmp)|*.bmp" Me.SaveFileDialog1.OverwritePrompt = True If Me.SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then If System.IO.File.Exists(Me.SaveFileDialog1.FileName) = True Then System.IO.File.Delete(Me.SaveFileDialog1.FileName) End If iBitmap.Save(Me.SaveFileDialog1.FileName) End If End If CloseClipboard()

相关文章

Format[$] ( expr [ , fmt ] ) format 返回变体型 format$ 强...
VB6或者ASP 格式化时间为 MM/dd/yyyy 格式,竟然没有好的办...
在项目中添加如下代码:新建窗口来显示异常信息。 Namespace...
转了这一篇文章,原来一直想用C#做k3的插件开发,vb没有C#用...
Sub 分列() ‘以空格为分隔符,连续空格只算1个。对所选...
  窗体代码 1 Private Sub Text1_OLEDragDrop(Data As Dat...