把c++builder翻译为delphi解决方法

把c++builder翻译为delphi
大家帮忙看一下：
c++builder：
typedef long (__stdcall *Init_Type)(char * Directory, int WorkMode, char* WorkData,long hwndparent,TRect dre);

delphi：
Init_Type = procedure(Directory:PAnsiChar;WorkMode:Integer;WorkData:PAnsiChar;hwndparent:HWND;dre:TRect);

是否能这样翻译?
我运行的时候总是报00000000地址错误？


[解决办法]
type
Init_Type = function (Directory:PAnsiChar;WorkMode:Integer;WorkData:PAnsiChar;hwndparent:HWND;dre:TRect):dword;stdcall;

[解决办法]
long应该是返回值为Longword
[解决办法]
long应该是返回值为Longword
[解决办法]
long应该是返回值为Longword