Problem mit Variant

[Uwe Raabe]

Zitat von ede57:

Laut Hilfe so :

Sub GetOrigin( CATSafeArrayVariant ioOrigin)
Returns the origin point which the hole is anchored to.
This point belongs to a tangent plane.
Returns:
oOrigin A Safe Array made up of 3 doubles : X, Y, Z - Hole origin point coordinates
Example:
The following example returns in coordArray the coordinates of hole firstHole:

Call firstHole.GetOrigin coordArray
Set x = coordArray[1]
Set y = coordArray[2]
Set z = coordArray[3]

Ein SafeArray ist so beschrieben:

Defines a CATSafeArrayVariant type to be used by Automation interfaces.
CATSafeArrayVariant are one-dimensional arrays of CATVariants.

Ich interpretiere das so, daß ein SafeArray zurückgegeben wird, der Server also selbst für die Initialisierung der OleVariant zuständig ist. Versuch also mal den übergebenen Parameter vor dem Aufruf auf unassigned zu setzen. Vielleicht stört sich Catia ja an dem aktuellen Inhalt. Nach dem Aufruf mal mit VarIsArray prüfen, ob es was gebracht hat.