用Delphi写的dll在VC中不能正常调用，高手帮我看看!

用Delphi写的dll在VC中不能正常调用，高手帮我看看!
library Test;uses
  SysUtils,
  Classes;{$R *.res}//用var传递byte
function Test1(var d: Byte): Integer; stdcall;
begin
  d := 255;
  Result := 0;
end;//用PChar传递char
function Test2(d: PChar): Integer; stdcall;
begin
  d^ := Char(255);
  Result := 0;
end;//用var传递integer
function Test3(var d: Integer): Integer; stdcall;
begin
  d := 65535;
  Result := 0;
end;//用PInteger传递integer
function Test4(d: PInteger): Integer; stdcall;
begin
  d^ := 65535;
  Result := 0;
end;function Test5(): Integer; stdcall;
begin
  Result := 65535;
end;exports
  Test1,
  Test2,
  Test3,
  Test4,
  Test5;
begin
end.
这个DLL的代码有问题吗？