我用Delphi编写的Dll用Regsvr32注册为何报错

错误提示:PJCoordSys.dll was loaded, but the DllRegisterServer entry point was not found.DllRegisterServer may not be exported, or a corrupt version of PJCoordSys.dll may be in memory. Consider using PView to detect and remove it.// 部分代码
exports
  GaussX,
  GaussY,
  GaussB,
  GaussL;function GaussX(B, L: double; MidL: double; PJ: integer): double; stdcall;