Hi all,

I have a mysterious behavior (well maybe not mysterious). I create a DLL in VFP7. It works with no problem under VFP 6 or 7. But when i try to used in VB6, i get a range of errors (wrong number of parameters, type mismatch, radonly property) and the error changes with each compile without changing a single line of code. The following is the VFP class:

Define Class Test as Custom Of 'Test.prg' Olepublic

Dimension Array1(10)

Dimension Array1_COMATTRIB[4]
Array1_COMATTRIB[1] = 0
Array1_COMATTRIB[2] = 'Array1 Description'
Array1_COMATTRIB[3] = 'Array1'
Array1_COMATTRIB[4] = 'Single'

Procedure Init as VOID
For i=1 to 10
This.Array1(i) = i
EndFor
EndProc

Procedure Array1_Assign(m_Value as Single, intIndex as Integer) as VOID
This.Array1(intIndex) = m_Value
Endproc

Function Array1_Access(intIndex as Integer) as Single
Return This.Array1(intIndex)
Endfunc

Enddefine

And now the vb6 code:
Private Sub Command1_Click()
Dim ox As testchar.Test
Set ox = New testchar.Test
With ox
ox.Array1(1) = 6
Debug.Print ox.Array1(1)
End With
Set ox = Nothing
End Sub

Thanks in advance,

Setrak Aslanian