---

Hi, ich habe mal eine frage...
ich habe ein Makro in VBA und übersetze es in VB.NET. Aber an einer Stelle komme ich gerade nicht weiter.

Code:

---

Dim split1 As Split
split1 = shapeFactory1.AddNewSplit(reference1, catPositiveSide)

---

Meine frage ist nun. Wie übersetze ich nun die CATIA split operation und das catPositiveSide? Ich finde leider nichts dazu...
Kann mir da vielleicht jemand helfen?
Gruß

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

---

Was haste denn für ein Problem?

Wenn ich hier nie Fehlermeldungen bekomme, kann ich auch immer nur Mutmaßen...

Ich Tippe darauf, dass Du die Verweise nicht gesetzt hast.

------------------
Mit freundlichen Grüßen,
Henry Schneider
alias Lila

Es gibt einen ewigen Wettkampf zwischen der Natur und den Ingenieuren:
Die Ingenieure versuchen, immer idioten-sicherere Systeme zu bauen,
die Natur versucht, immer bessere Idioten zu bauen

Xing

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

---

Welche verweise wären es den in dem fall.
Kann sehr gut möglich sein, dass die mir fehlen

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

---

HybridShapeTypeLib
PARTITF

------------------
Mit freundlichen Grüßen,
Henry Schneider
alias Lila

Es gibt einen ewigen Wettkampf zwischen der Natur und den Ingenieuren:
Die Ingenieure versuchen, immer idioten-sicherere Systeme zu bauen,
die Natur versucht, immer bessere Idioten zu bauen

Xing

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

---

Hallo, ich habe treffe das gleiche Problem ebenso wie @magoh87.
Bei umwandlung von interner VBA der CATIA (.vbscript) zu VB.Net bekommt Fehlermeldung "Der Name catNegativeSide wurde nicht deklariert"(in CATIA funktioniert der Makro gut).

Code:

---

                Dim tre1 As Reference

                tre1 = part1.CreateReferenceFromObject(CType(Sel1.Item2(1).Value, AnyObject))

                Dim split1 As Split

                split1 = CType(shapeFactory1.AddNewSplit(tre1, catNegativeSide), Split)

                part1.UpdateObject(CType(split1, AnyObject))

---

@HoBLila, ich hab Verweise PARTITF und CATAssemblyTypeLib hinzugefügt und Spacename importiert.

Code:

---

      Imports PARTITF
      Imports CATAssemblyTypeLib

---

@magoh87, das Problrm wurde gelöst?
kann jemand mir helfen?

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

---

Ihr braucht die CatSplitSide Enumeration, ich weiß nur grad nicht wo die drin steht. :-(

Solange die nicht da ist könnt ihr es mit 0 und 1 versuchen.

Eventuell startet die Enum auch mit anderen Zahlen, das müsst ihr testen, ich weiß es leider nicht. :-(

catPositiveSide müsste aber theoretisch 0 oder 1 sein
und catNegativeSide theoretisch (laut Doku) 1 oder 2

Enums nimmt man, damit man sich keine Gedanken über den Wert dahinter machen muss. In eurem Fall aber eher hinderlich, da der Verweis scheinbar fehlt.

------------------
Mit freundlichen Grüßen,
Henry Schneider
alias Lila

Es gibt einen ewigen Wettkampf zwischen der Natur und den Ingenieuren:
Die Ingenieure versuchen, immer idioten-sicherere Systeme zu bauen,
die Natur versucht, immer bessere Idioten zu bauen

Xing

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