当前位置>>知识集锦

最近在编水动力学模型,用Fortran编写,运行效率相对较快,可视化部分则采用C#来做。由于涉及两门语言,便会产生交互问题,最佳搭配是用Fortran生成DLL,由C#来调,反过来的话则比较困难。我采用的运行环境是VS2010+IVF11.0,下面稍微讲一下方法,记录一下。

C#中导入DLL,需要显式的引用:

[System.Runtime.InteropServices.DllImport("READTS.dll", CharSet = System.Runtime.InteropServices.CharSet.Ansi, CallingConvention = CallingConvention.Cdecl)]

若直接采用[System.Runtime.InteropServices.DllImport("READTS.dll")]的话,编译能通过,但调试时可能会如下错误:

“对 PInvoke 函数的调用导致堆栈不对称”

这主要是由于系统默认的CallingConvention是“StdCall”,需要改为“Cdecl”。

Fortran与C#进行数据交换时,数值比较容易,字符则相对麻烦。Fortran默认采用引用地址的方式,而C#对数值是采用“传值”,对字符串是采用“传址”,而且二者对字符的处理完全不同。

在数值交换时,最好在Fortran里显式的声明为“传值”,方法如下:

!DEC$ ATTRIBUTES REFERENCE::Time_step

上面的“Time_step”为需要传递的数值参数,对于字符则无须声明为传值。在传递字符时,容易出现字符长度不一致,所以在Fortran中最好不要指明字符的长度,而采用(len=*)来声明,这样的话,传进来的字符是多长便是多长,如:

character(len=*)::filename_inp

对于数组的传递,在C#中只需要传递数组的第一个元素,这包括方法(函数)的声明与使用,但需要指出的是Fortran与C#中的数组的行和列是相反的,这个在数组使用与传递时需要做一定的变换。在传递字符时,需要同时传递字符及字符长度,所以在方法(函数)的声明时,也需要声明长度变量:

public static extern void READ_TS(ref int Item_num, ref int Time_step_num, ref double Time_step,string filename_inp, int Z);

上面的string filename_inp为要传递的字符串, int Z为字符串的长度。

对于字符串数组的传递,特别是传回来,感觉有些麻烦,也没有摸索出方法,就采用了TXT方式交互,对于数据量级不是很大的情况下,速度还可以。





评论