---

Hallo,

ich möchte die Punkte eines Marker2D vom Typ "freehand" über die Methode Getpositions einlesen. Dazu muß ich wissen, wie groß das Ausgabefeld ist (es wird ein Array unbestimmter Größe zurückgegeben). Der Marker2D "verrät" mir aber nicht, wieviele Punkte er besitzt. Dynamisches Feld funktioniert nicht. Kann mir jemand weiterhelfen?

Bisher lege ich ein Feld an, welches genügend groß ist - leider weis ich nicht was genügend ist!

Gruß Thomas

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

ich weiß nicht ob ich deine Frage richtig verstanden habe, aber mit

UBound() erhälst du die Länge eines Arrays.

Also z.B.

Integer = UBound(Array)

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Achulio

das Problem ist, daß ein Marker2D vom Typ "freehand" eine beliebige (unbekannte) Zahl von Punkten enthält.

Diese Punkte kann ich mit der Methode GetPositions in ein Feld speichern.
Das Feld muß zuvor genügend groß dimensioniert werden.
Mit Ubound erhalte ich dann nur diese Dimension zurück.

Wenn mein Marker (MyMarker2D1) nicht mehr als 100 Punkte hat:

Dim MPos(199)  ' 200 Koordinaten für 100 Punkte
MyMarker2D1.GetPositions MPos

dann ergibt Ubound(MPos) den Wert 199

Aber aus wieviel Punkten besteht nun der Marker?
Wenn ich das im Vorfeld wüsste, könnte ich auch schon das Feld entsprechend dimensionieren und Ubound wäre gar nicht nötig.

Bei einer Collection hat man das .Count Property aber bei Arrays gibts sowas nicht. Mir scheint Dassault hat hier schlicht vergessen eine entsprechendende Methode für die Marker zu implementieren.

Thomas
 

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,
hmm... ich glaube ich verstehe das Problem...
folgendes fällt mir dazu ein, kannst ja mal ausprobieren:

a) Definiere die Variable MPos vorher nicht mit "Dim", evtl. legt Catia diese selbst an mit der entsprechenden Dimension (ähnlich dem Befehl "split"

b) Oder Definiere MPos vom Typ "Variant" (Dim MPos As Variant), das ist eine generische Variable, die von Catia nach Bedarf belegt wird

c) Oder Erzeuge ein genügend großes Feld, lies die Feldinhalte in einer Schleife aus mit
if Feld.Inhalt <> "" Then
    i = i+1
End If
Und mache dann ein ReDim mit deiner Feldvariablen und der Richtigen größe...

hoffe geholfen zu haben

achulio

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hab ich alles schon ausprobiert und hat nichts gebracht.

Jetzt dimensioniere ich das Feld zuächst auf 3 (passt für Line, Arrow, Circle, Rectangle). Wenn GetPositions einen Fehler meldet, vergrößere ich das Feld um Faktor 2 solange, bis kein Fehler mehr kommt. Anschließend schaue ich mir den Typ der Feldinhalte an. Wenn dieser "Empty" ist, habe ich die eigentliche Feldgröße gefunden.

Naja, es ist nicht elegant, aber es funktioniert und ist auch bei einem Marker mit 1000 Punkten schnell.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP