在DELPHI 中可以调用VB写的DLL文件吗？因为我没有原码不能改写。(200分)

在DELPHI 中可以调用VB写的DLL文件吗？因为我没有原码不能改写。
在VB中调用如下。
Declare Function Rockey Lib "RYDLL32.DLL" (ByVal fcode As Integer, ByRef handle As Integer, ByRef lp1 As Long, ByRef lp2 As Long, ByRef p1 As Integer, ByRef p2 As Integer, ByRef p3 As Integer, ByRef p4 As Integer, ByVal buffer As Any) As Integer
我改成了
implementation
function Rockey(fcode:Integer;handle:Integer;lp1:Longint; lp2:Longint;p1:Integer;p2:Integer; p3:Integer;p4:Integer;buffer: string):integer;stdcall;external 'RYDLL32.DLL';
并且DLL文件已经在运行环境了。
但一执行到调用的句子就死机（黑屏，报错，重启）实在不清楚是什么问题。

请不要重复发一样内容的帖子。
如果想让人关注到，定期提前就可以了。

function Rockey(fcode:Integer;handle:Integer;lp1:Longint; lp2:Longint;p1:Integer;p2:Integer; p3:Integer;p4:Integer;buffer: Varriant):integer;stdcall;external 'RYDLL32.DLL';
//试下把buffer的类型改为Varriant,或其他类型

ByRef 传地址，改成var


Rockey(fcode:Integer; var handle:Integer; var lp1:Long; var lp2:Long;.....

ok了