---

Hallo,

Ich hab ein ASM abgeleitet und Textblasen an die Teile gesetzt. Die Positionsnummern für die Textblasen will ich anhand des Filenamen des referenzierenden Teiles setzen.

Mit folgendem Code komm ich zwar auf das 2D Element, aber ich weiss nicht wie ich an den Filename der Referenz komme.

        Dim objApp As SolidEdgeFramework.Application
        Dim objDoc As SolidEdgeDraft.DraftDocument
        Dim objSheet As SolidEdgeDraft.Sheet
        Dim objBalloons As SolidEdgeFrameworkSupport.Balloons
        Dim SelBal As SolidEdgeFrameworkSupport.Balloon
        Dim i As Integer
        Dim Obj As Object
        Dim XPos As Double
        Dim yPos As Double
        Dim key As Boolean
        Dim zPos As Double

        objApp = GetObject(, "SolidEdge.Application")
        objDoc = objApp.ActiveDocument
        objSheet = objDoc.ActiveSheet
        objBalloons = objSheet.Balloons

        For i = 1 To objBalloons.Count()

            SelBal = objBalloons.Item(i)

       
            SelBal.GetTerminator(TerminatorObj:=Obj, x:=XPos, y:=yPos, z:=zPos, keyPoint:=key)
            MsgBox(Obj.object.parent.type)

        Next

 

Vieleicht kann mir jemand aus dem Forum helfen??
 

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

---

das sollte so gehen:

MsgBox (Obj.object.ModelMember.FileName)

Wenn ich das richtig verstanden habe sollen statt der Pos-Nummern
die Dateinamen erscheinen, richtig? Wenn dem so ist, so kann das SE
beim Erstellen einer Stueckliste (Liste optional) auch leisten.

modeng

------------------
Lieber Fehler riskieren als Initiative verhindern (R. Mohn)

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

---

O.K. vielen Dank schon mal.

auf diese Weise bekomm ich immer den Filenamen des Parts, egal in welcher Strukturtiefe es sich befindet.

Ich möchte die Balloons aber so füllen, wie sie in der Listensteuerung konfiguriert sind. D.h. sind die Teile der Subassemblies nicht eingeschlossen, soll mir der Filename des Subassemblies angezeigt werden.

Ist das möglich?

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

---

[...]
auf diese Weise bekomm ich immer den Filenamen des Parts, egal in welcher Strukturtiefe es sich befindet.
[...]
das kann SE auch automatisch machen.

[...]
soll mir der Filename des Subassemblies angezeigt werden.
[...]
ja, geht auch wenn das in der Partslist entsprechend gesetzt ist
(Sub-Asm als ein Part).

modeng

------------------
Lieber Fehler riskieren als Initiative verhindern (R. Mohn)

[Diese Nachricht wurde von modeng am 20. Dez. 2007 editiert.]

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

---

Hallo modeng,

ich will nicht den Filenamen in die Textblasen schreiben, sondern anhand des Filename aus einer externen Tabelle (Stückliste) die Textblasen füllen.

Zitat:

---

ja, geht auch wenn das in der Partslist entsprechend gesetzt ist
(Sub-Asm als ein Part).

---

Wie und wo mach ich das?

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

---

... ach so, ja dann man viel Spass beim Programmieren.
Dennoch, irgendwie ein merkwuerdiges Verfahren ...

modeng

------------------
Lieber Fehler riskieren als Initiative verhindern (R. Mohn)

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

---

Da würde ich die gewünschten Informationen aus der Tabelle per Programm in eine Benutzerdefinierte Eigenschaft der Baugruppe/Teile schreiben. Dan funktionieren die Textblasen einfach so, wie immer.

Der angestrebte Weg erscheint mir nicht sinnvoll, zumal es wohl auch nur über die Baugruppe geht.

Oder Du setzt den Dateinamen in die Textblase und vergelchts mit der Information und ersetzt dann den Text. Aber halte ich auch für etwas unglücklich.

------------------
APeters@BSS-Online.de

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