紧急求救，在线等，非常简单的dll调用

我用vc写了一个非常简单的dll
其中有一个函数
int freq1(char *aa)
{return 0;
}
delphi中调用
function freq1(x:Pchar):integer;stdcall;external('c:\symmetry_modules.dll');button1中执行
i:=freq1(pchar('c:\ss.txt'));执行结束后
会出现：access violation at XXXx:write of address of 0x000000000
不知道是什么地方除了问题
我以前用过比这复杂得多的，都很正常
请教高手