在delphi中使用VB ocx(100分)

本人最近找到一个ACtiveX-slave,随之有一个VB的例子：

Dim MyData(20) As Integer

Private Sub Form_Load()
Data1 = slave.CreateData(40101, 20, MyData(0))
End Sub

运行正确。

在delphi中，本人只能写成下面的样子：

procedure TForm1.Formshow;
Var
MyData: array[1..20] of smallint
begin
mydata[1]:=1234;
mydata[2]:=5678;
...
MBAIHandle:=slave.CreateData(40101,20,Mydata[1])
end;

但数据结果是错误，请教各位如何在delhpi中调用ActiveX,他被VB证明是正确的。
先谢了！

据说使用VB的ActiveX还要VB的Dll的

不会吧，你能不能写得详细些!

你要先把这个ocx在delphi中注册。

具体是什么错误

多人接受答案了。