---

Hallo zusammen,

gibt es eine Möglichkeit, in CatiaV5 R16 und folgende, in einem Script das Undo zu steuern? Also kann man in den Optionen den Stack Size auf einen bestimmten Wert setzen?
Ich lasse nämlich eine Powercopy in einem Macro mehrmals aufrufen und der Speicher läuft nach einer bestimmten Anzahl von Aufrufen voll. Setze ich vorher den Stack Size auf 0, erhöht sich der Speicher nur ganz leicht. ich will aber nicht, dass man dies von Hand jedesmal umstellen muss.

Vielen Dank für Eure Antworten.

Viele Grüße

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

---

Hallo krocor,
bitte poste doch mal die Fehlermeldung. Es kann auch sein das dein Script den Stapelspeicher (Stack) deines Rechners zum Überlaufen bringt, ist mir schon mal durch ein Programmierfehler bei einer rekursiven Funktion passiert.

------------------
Grüße TStone
   "Respektiere die Macht der Worte, wähle sie mit Bedacht!"

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

---

Hallo krocor,

ich habe heute in der Arbeit mal nachgeschaut. Es gibt keine entsprechende Funktion (Methode bzw. Objekt) die den Stacksize verändern könnte.
Ich würde aber auch mal auf einen kleinen Programmfehler tippen denn eigentlich sollte der Stack nicht überlaufen können.

------------------
MFG Daniel

Die KATJA ist halt doch nur ne zickige Französin

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

---

Hallo Zusammen,

ich bekomme folgende Fehlermeldung bei diese Code:
"out of stack size"

Code:

---

Sub Scan(ScanProduct)

For i = 1 To ScanProduct.Products.Count
   

    Set part1 = ScanProduct.Products.Item(i).ReferenceProduct.Parent.Product

        If part1.Products.Count > 0 Then
            Scan part1
        End If

Next
End Sub

---

Was mache ich falsch?

Vielen Dank im Voraus

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

---

es wird aufgerufen
macht eine Schleife über alle Products
Wennp part1.Products.Anzahl > 0 dann starte dich selbst.
usw.
u.U. beisst der Hund immer in den selben Schwanz.

[Diese Nachricht wurde von Thomas Harmening am 19. Nov. 2013 editiert.]

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

---

Servus
Wo hast du "i" definiert? Wie groß ist "i" bei der Fehlermeldung, bzw gibt es soviel Exemplare in der Unterbaugruppe?

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

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

---

Hallo Thomas, hallo Bernd,

vielen Dank Eure Antwort.
also: "i" bleibt immer auf 1.
Es wurde immer das gleiche Part aufgerufen.

Ich habe mein Code so geändert:

Code:

---

Sub Scan(product1)

Set selection1 = CATIA.ActiveDocument.Selection
For i = 1 To product1.Count
   
    If product1.Item(i).Products.Count > 0 Then
   
    Set product2 = product1.Item(i).Products
        Scan product2
       
    Else
        Set part1 = product1.Item(i).ReferenceProduct.Parent.Part
 
     
    End If
   
  Next
End Sub

---

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