VB源程序转Delphi程序(100分)

现有VB的源程序希望转成Delphi程序，该怎样转？

Vb需要的数据定义
Const lBufSize As Long = 800 * 600
Public PBuffer(lBufSize) As Byte

VB函数：
Function ReturnData(ByVal lI1 As Long, ByVal lNB As Long, ByRef bytFirstDest As Byte) As Long

VB调用函数
ReturnData(123, lBufSize, PBuffer(0))
-------------------------------------------
用delphi 该怎样做这件事情?

这里有了
http://www.delphibbs.com/delphibbs/dispq.asp?lid=2526868