Public Sub GetFocusDistances As Float()
Dim f(3) As Float
r.Target = parameters
r.RunMethod4("getFocusDistances", Array As Object(f), Array As String("[F"))
Return f
End Sub
'call it
Dim f() As Float = camEx.GetFocusDistances
Log(f(0) & ", " & f(1) & ", " & f(2))