• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    公众号

C#调用DelphiDll链接库方法及示例

原作者: [db:作者] 来自: [db:来源] 收藏 邀请

每种编程语言调用DLL的方法都不尽相同,在此只对用C#调用Delphi DLL的方法进行介绍

首先要搞清楚一点的是:什么是托管,什么是非托管?

一般可以认为:非托管代码主要是基于win 32平台开发的DLL,activeX的组件,托管代码是基于.net平台开发的

C# 调用DLL中的非托管函数一般方法

首先,应该在C#语言源程序中声明外部方法,其基本形式是:

[DLLImport(“DLL文件”)]

修饰符 extern 返回变量类型 方法名称 (参数列表)

其中:

DLL文件:包含定义外部方法的库文件。

修饰符: 访问修饰符,除了abstract以外在声明方法时可以使用的修饰符。

返回变量类型:在DLL文件中你需调用方法的返回变量类型。

方法名称:在DLL文件中你需调用方法的名称。

参数列表:在DLL文件中你需调用方法的列表。

注意:需要在程序声明中使用System.Runtime.InteropServices命名空间。

      DllImport只能放置在方法声明上。

DLL文件必须位于程序当前目录或系统定义的查询路径中(即:系统环境变量中Path所设置的路径)。

返回变量类型、方法名称、参数列表一定要与DLL文件中的定义相一致。

下面结合示例如:

        [DllImport("TestDll.dll", EntryPoint = "SayHello")]      "TestDll.dll"为dll名称,EntryPoint 为函数名
        static extern string SayHello(string Name);              //delphi 中的函数
        private string GetMessage()                                  //C#自己写的函数,并调用Dll函数
        {
            return SayHello("");
        }

   当前程序中调用 GetMessage时就会返回Dll SayHello 函数的内容

  其中,Dll SayHello函数如下(Delphi语言):

 function SayHello(NameTool:PChar):PChar;stdcall;
  begin
    if Length(NameTool) <=0 then
      Result := PChar('Hello Person,welcome to chian.')
    else
      Result := PChar('Hello '+ NameTool + ', welcome to chian.');
  end;

另外,如果需要调用传值,的方法时,通过Delphi的参数 var 与C#中的ref关键字结合使用如:

procedure ChangeNumber(var number:Integer);stdcall;
  begin
    number := 100;
  end;

C#调用如下:

private int MyNumber = 150;

[DllImport("TestDll.dll", EntryPoint = "ChangeNumber")]
 static extern void ChangeNumber(ref int count);
 private void Changes()
 {
     ChangeNumber(ref MyNumber);
 }

当C#程序中调用  Changes方法后,MyNumber的值将会改变为100

以上为C#简单调用Delphi Dll的方法。其中要注意的有:

DLL文件必须位于程序当前目录或系统定义的查询路径中(即:系统环境变量中Path所设置的路径)。

返回变量类型、方法名称、参数列表一定要与DLL文件中的定义相一致。

 

 


鲜花

握手

雷人

路过

鸡蛋
该文章已有0人参与评论

请发表评论

全部评论

专题导读
上一篇:
delphiabsolute应用实例发布时间:2022-07-18
下一篇:
Delphi弹出Windows风格的选择文件夹对话框,还可以新建文件夹发布时间:2022-07-18
热门推荐
阅读排行榜

扫描微信二维码

查看手机版网站

随时了解更新最新资讯

139-2527-9053

在线客服(服务时间 9:00~18:00)

在线QQ客服
地址:深圳市南山区西丽大学城创智工业园
电邮:jeky_zhao#qq.com
移动电话:139-2527-9053

Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap