VC调用Fortran的DLL!!着急！！

[yheysj]

fortran 源码如下：
! ggg.f90
!
! FUNCTIONS/SUBROUTINES exported from ggg.dll:
! ggg - subroutine
!
subroutine ggg(v1,v2,r)
implicit none
! Expose subroutine ggg to users of this DLL
!
!DEC$ ATTRIBUTES DLLEXPORT::ggg

! Variables
real v1,v2,r
r=sqrt(v1*v1+v2*v2)
! Body of ggg

end subroutine ggg
建立一个win32有hello world 输出：
源代码如下：
//

#include "stdafx.h"
extern "C" void ggg(float v1,float v2,float &r);
extern "C" _declspec(dllexport)
void _stdcall C_Callfor(float a,float b,float &c)
{
ggg(a,b,c);
}
int main(int argc, char* argv[])
{
float a,b,c;
a=3.0;
b=4.0;
C_Callfor(a,b,&c);
printf("Hello World!\n");
return 0;
}

此过程我已经将ggg.lib 和ggg.dll加载到当前工程！！
编译Vc不通过，如下：
--------------------Configuration: cpp - Win32 Debug--------------------
Compiling...
cpp.cpp
Linking...
Creating library Debug/cpp.lib and object Debug/cpp.exp
cpp.obj : error LNK2001: unresolved external symbol _ggg
Debug/cpp.exe : fatal error LNK1120: 1 unresolved externals
Error executing link.exe.

cpp.exe - 2 error(s), 0 warning(s)


求求求！！

[ForestDB]

设置路径什么的都对了么？
还有那些调用惯例的处理是正确的么？

[yheysj]

没用的，一个鸟样！！

[fox000002]

ForTran 不区分大小写

导出的函数名按大写给出

[fox000002]

使用的时候，lz 的声明也有问题

extern "C" _declspec(dllimport) void ggg(float v1,float v2,float &r);

void _stdcall C_Callfor(float a,float b,float &c)
{
ggg(a,b,c);
}

[yheysj]

设置那个路径？我把dll&&lib文件拷贝到当前VC工程的目录下，并将两个文件load 到我的工程中！还有机关么？

[cattycat]

再加上#pragma comment(lib,"")引号中是你的lib名字

[cattycat]

就不要加你声明的那些函数了。

[yheysj]

还有没有其他的答案，想在CView里面调用怎么办?

[gules]

实际上我不懂楼主的问题，我只是对
C_Callfor(a,b,&c); // &c 的类型不是 float* 吗？而函数声明与定义的类型是 float& 引用啊!
这一句居然能编译通过表示惊讶！