---

Hallo,

ich hab nen Process (NC) wo ich mich bis an die Parameter rangearbeitet hab und da hab ich dann ein Problem.
Die Anzahl der Parameter hab ich mit:

Code:

---

set oCATIAManufacturingActivity = oProzess.ChildrenActivities.Item(2).programs.GetElement(1)
set oCurActivity = oCATIAManufacturingActivity.activities
ParaAnzahl = oCurActivity.Parameters.count

---

welcher die Zahl 5 ausgibt.

Wenn ich den Parameter ermitteln will mit:

Code:

---

ParaName = oCurActivity.Parameters.Item(x).name

---

kommt ein Fehler bzw er steigt aus. (Für x stehen die Zahlen 1 bis 5)

Wie bekomme ich die Namen der Parameter heraus, damit ich die Parameter beim Namen ansprechen kann?

z.B. so:

Code:

---

ParaWert = oCurActivity.Parameters.Item("HierstehtderName").value

---

Gruß

Tiberius

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

---

Hallo,

mir ist aufgefallen, wenn ich mit dem Mauszeiger über einen der Werkzeugwechsel fahre dann wird mir das hinterlegte Werkzeug nochmal angezeigt und wohl der name eines Parameters. Dieser ist in meinem Fall: "MFG_ASS_COMMENT". Nun dachte ich, ich lese diesen zuerst aus, weil ich den Inhalt auch benötige. Lösen wollte ich es so:

Code:

---

dim WWech
dim CurrentAssembly
Schleifenanfang
WWech = oCurActivity.type
if (WWech = "ToolChange" or WWech = "ToolChangeLathe") then
  On Error Resume Next
  set CurrentAssembly = NOTHING
  Err.Clear
  Set CurrentAssembly = oCurActivity.ToolAssembly
  fehler = Err.Number
  Dim Attrix
  Set Attrix = CurrentAssembly.getAttribute("MFG_ASS_COMMENT")
  fehler = Err.Number
  msgbox erreur
  Err.Clear
  If erreur = 0 Then msgbox Attrix.Value
  On Error goto 0
end if
Schleifenende

---

Leider komm ich so auch nicht ran.
Hat von Euch noch einer ne Idee?

Gruß

Tiberius

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