C# 调用Delphi dll 实例代码

在.NET框架中，C#作为主要的编程语言，有时候需要调用非托管代码，比如由Delphi编译的DLL动态链接库。本实例将详细解释如何在C#中调用Delphi编写的DLL，并提供相应的代码示例。 我们需要了解Delphi DLL的基本结构。在Delphi中，创建一个DLL通常包含定义导出函数、类型定义和常量等。在给定的Delphi源码中，定义了一个名为`dllres`的库，包含了两个导出函数：`getResStr`和`getMydata`。`getResStr`返回一个字符串指针，而`getMydata`返回一个结构体`TMydata`的指针。`TMydata`包含一个整型`id`、一个长度为10的字符数组`name`、一个布尔型`married`和一个双精度浮点型`salary`。 在C#中，要调用这些Delphi DLL中的函数，我们需要使用`DllImport`特性来导入DLL，并指定调用约定（在本例中是`stdcall`）。下面是如何在C#中实现这个调用的代码： ```csharp public class Invoke_Delphi_Dll_Exam { [DllImport("dllres.dll", CallingConvention = CallingConvention.StdCall)] public static extern IntPtr getResStr(int index); [DllImport("dllres.dll", CallingConvention = CallingConvention.StdCall)] public static extern IntPtr getMydata(); // 定义与Delphi中TMydata对应的结构体 public struct Mydata { public int id; public string name; public bool married; public double salary; // 构造函数，用于从字节数组中解析结构体 public Mydata(byte[] data) { if (data != null && data.Length == 33) { id = BitConverter.ToInt32(data, 0); name = Encoding.Unicode.GetString(data, 4, 20).Replace("\0", ""); // 去掉尾部的0字符 married = BitConverter.ToBoolean(data, 24); salary = BitConverter.ToDouble(data, 25); } else { id = 0; name = String.Empty; married = false; salary = 0; } } } // 示例方法 public static void Main() { // 调用getResStr函数 int index = 2; IntPtr resPtr = getResStr(index); string resStr = Marshal.PtrToStringAnsi(resPtr); // 从指针获取字符串 Console.WriteLine($"ResStr: {resStr}"); // 调用getMydata函数 IntPtr mydataPtr = getMydata(); Mydata myDataInstance = new Mydata(Marshal.PtrToStructure(mydataPtr, typeof(Mydata))) as Mydata; Console.WriteLine($"Id: {myDataInstance.id}, Name: {myDataInstance.name}, Married: {myDataInstance.married}, Salary: {myDataInstance.salary}"); } } ``` 这段C#代码定义了一个名为`Invoke_Delphi_Dll_Exam`的类，其中包含了对Delphi DLL的两个导出函数的调用。`getResStr`函数接受一个整数参数并返回一个指向字符串的指针，`getMydata`函数则返回一个`TMydata`结构体的指针。为了处理返回的结构体，C#中定义了一个`Mydata`结构体，它的构造函数可以从字节数组中解析出结构体的各个字段。 在`Main`方法中，我们演示了如何调用这两个函数并处理返回结果。`getResStr`返回的是一个ANSI字符串，所以我们使用`Marshal.PtrToStringAnsi`转换为C#字符串。`getMydata`返回的是结构体的指针，使用`Marshal.PtrToStructure`将指针转换为C#结构体实例。 总结来说，C#调用Delphi DLL的关键在于理解Delphi导出函数的签名，以及在C#中正确地声明和使用`DllImport`。此外，还要注意数据类型的对应，例如字符串在Delphi中通常是PChar（指针），在C#中需要转换为适当的形式。在这个例子中，Delphi的`TMydata`结构体与C#的`Mydata`结构体通过构造函数实现了对应。正确地处理这些细节，就可以顺利地在C#中调用Delphi编写的DLL了。