[混编] C++中如何把多组类的数据传递给Fortran的dll

class unitinfo
{
public:
        int cotrolno;
        CString unitname;
        int unittype;
        int solid;
        double coearea;
        double shapepara[3];
        double rotationpara[3];
        double tranpara[3];
        int pn;
        double *plist;
};

public：
unitinfo *inunit；
singlenum=5；！外部输入的
inunit=new unitinfo[singlenum];

typedef void(*model)(int&,class unitinfo*);
model hydromodel=(model)GetProcAddress(kLibrary,"hydromodel");

hydronodel(singlenum,&(inunit[0]));