微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

如何将位图传递给Delphi在C#中编写的dll?

在这样写的dll中有一个Delphi函数

function LensFlare(Bitmap: TBitmap; X,Y: Int32; Brightness: Real): TBitmap; StdCall;
       Begin
         // ...
         Result := Bitmap;
       End;

我想在C#中使用它,
我试过这个,但我没有成功:

[DllImport("ImageProcessor")]
    static extern Bitmap LensFlare(Bitmap bitmap,int x,int y,double Brightness);

    private void button1_Click(object sender,EventArgs e)
    {
        Bitmap b = new Bitmap(@"d:\a.bmp");
        pictureBox1.Image = LensFlare(b,100,50); // Error!
    }

错误:“尝试读取或写入受保护的内存.这通常表示其他内存已损坏.”

我怎样才能做到这一点?

解决方法

Delphi的TBitmap类与.NET的Bitmap类非常不同.它们彼此不兼容,并且对于互操作性目的而言都不安全.

您将不得不使用原始的Win32 HBITMAP句柄.

function LensFlare(Bitmap: HBITMAP; X,Y: Int32; Brightness: Real): HBITMAP; StdCall;
Begin
  // ...
  Result := Bitmap;
End;
[DllImport("ImageProcessor")]
static extern IntPtr LensFlare(PtrInt bitmap,double Brightness);

[DllImport("gdi32.dll")]
static extern bool DeleteObject(IntPtr hObject);

private void button1_Click(object sender,EventArgs e)
{
    Bitmap b = new Bitmap(@"d:\a.bmp");
    IntPtr hbmp = LensFlare(b.GetHbitmap(),50);
    try {
        pictureBox1.Image = Image.FromHbitmap(hbmp);
    }
    finally {
        DeleteObject(hbmp);
    }
}

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。

相关推荐