- C++动态库函数
Test.dll文件中有以下函数:
extern "C" _declspec(dllexport) void TestDLL(double **mArray, double *vArray, int num, double &error);
参数依次为:二维数组、一维数组、整数、浮点数。
- Delphi翻译
Delphi中PDouble对应C++里的*;
定义类型:PPDouble = ^PDouble对应C++里的**;
procedure TestDLL(mArray: PPDouble; vArray: PDouble; num: Integer; var error: Double); cdecl; external 'Test.dll';
- Delphi调用
类型:
Matrx1 = array of Double;
Matrx2 = array of Matrx1;
声明:
mArray : Matrx2;
vArray :Matrx1;
调用:
TestDLL(@mArray[0], @vArray[0], num, error);