CreateOleObject创建的对象,怎么讲字节数组传给它? ( 积分: 100 )

该对象的属性Array描述如下:
HRESULT Array([in] VARIANT par_value);

VB中的实例代码:
Visual Basic Example
Dim ByteArrayAttach As New MSSOAPLib30.ByteArrayAttachment30
...
Dim BArray(3) As Byte
BArray(0) = 65
BArray(1) = 66
BArray(2) = 67
ByteArrayAttach.Array = BArray

请问Delphi中怎样传数组给它?

该对象的属性Array描述如下:
HRESULT Array([in] VARIANT par_value);

VB中的实例代码:
Visual Basic Example
Dim ByteArrayAttach As New MSSOAPLib30.ByteArrayAttachment30
...
Dim BArray(3) As Byte
BArray(0) = 65
BArray(1) = 66
BArray(2) = 67
ByteArrayAttach.Array = BArray

请问Delphi中怎样传数组给它?