---

Habe eben auf 6.6 aufdatiert und schon ein erstes Problem:

Ich habe ein Makro welches die möglichen Daten (Attribute) anzeigt und dazu "Utils.TypeItemsByKind(aucObjDevice)" benutzt um die Attribute welche pro Typ Gerät definiert sind auszulesen.
Seit dem Update kommen da aber nicht mehr alle Attribute, nur noch einige wenige (ca 10 von über 70, sehe keinen Zusammenhang welche Attribute kommen und welche nicht).
Weiss jemand ob da was geändert hat oder ob es einen anderen (funktionierenden) Weg gibt um die Type Definitions zu lesen mit VBA?

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

---

Hi!
Evtl musst Du in den verfügbaren VBA Referenzen die "Engineering Base TypeLibrary 18" hinzufügen.

Viel Erfolg...

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

---

Ja klar, die Referenz ist natürlich vorhanden: Engineering Base 18.0 Type Library.
Die TypenDefinition bekomme ich ja auch korrekt, hier der Beispielcode:

Public Sub testTypeDef()
  Dim defs As TypeDefinition
  Dim item As TypeItem
  Dim dd As TypeDefinitions
  Dim i As Long
 
  Set dd = Application.TypeDefinitions
  Set defs = dd.ItemByKind(aucObjFunctionTypes)
  Set item = defs.TypeItems.item(1)
  i = item.AttributeDefinitions.Count
 
End Sub

"item" ist dann der "ActuatorTag" (erster Funktionstyp, Englische Version), und ich bekomme 9 Attribute obwohl viel mehr auf dem Dialog definiert sind... Es fehlen sogar die System Attribute wie Designation, Comment und so weiter in der Liste.

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

---

Hallo,
alles richtig gemacht!  Das ist ein Fall für die Hotline - es geht schlichtweg nicht mehr.

Gruß WickieEB

------------------
Wer A sagt, der muss nicht B sagen. Er kann auch erkennen, dass A falsch war. (Bertold Brecht)

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

---

Der Punkt wird bei AUCOTEC bereits bearbeitet.

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