| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| | |
 | PNY präsentiert die neue NVIDIA RTX A400 und die A1000 Grafikkarte, eine Pressemitteilung
|
|
Autor
|
Thema: I Logic zum ändern von Bauteillänge (1346 mal gelesen)
|
InventorSum Mitglied
 Beiträge: 8 Registriert: 05.12.2013
|
erstellt am: 05. Dez. 2013 10:17 <-- editieren / zitieren --> Unities abgeben:         
Hallo liebe Community, ich habe ein kleines Problem und übersehe bestimmt etwas. Ich versuche gerade eine kleine Regel zu erstellen die beim Öffnen eines Rohrs (gerades Rohr) ausgeführt wird. Hier soll via einer Inputbox die gewünschte Rohrlänge eingegeben werden. Das funktioniert soweit auch. Dann würde ich das geändert Rohr mit der neuen Länge gerne abspeichern. Direkt als .ipt hätte ich gar keine Möglichkeit gefunden? Somit habe ich den Export als .stp gewählt. Wichtig ist die neue Datei soll den Wert der neuen Länge im Dateinamen haben. z.B.: Rohr-NEUELÄNGE, auch das funktioniert... Nur beim Export in ein Stepfile ist noch die alte Rohrlänge von der Ursprungsdatei enthalten :/ Wie kann ich das ändern? Hier ist mein Code: Dim Name As String 'Wert aus Inputbox wird direkt in die Variable der Rohrlänge geschrieben, Standardwert 100mm myparam = InputBox("Wie lang solls denn sein?", "Test", "100")
Parameter("Rohrlänge") = myparam
'Name des Teils wird vergeben Name = "Rohr-" & myparam & "mm"
'Name wirsd zusätzlich vorher in einem Fenster angezeigt MessageBox.Show(Name, "Title") 'Aktualisiert das Bauteil auf die geänderte Länge iLogicVb.UpdateWhenDone = True ThisDoc.Save 'Fertiger Programmblock zum exportieren als .stp ' Get the STEP translator Add-In. Dim oSTEPTranslator As TranslatorAddIn oSTEPTranslator = ThisApplication.ApplicationAddIns.ItemById("{90AF7F40-0C01-11D5-8E83-0010B541CD80}") Dim oContext As TranslationContext oContext = ThisApplication.TransientObjects.CreateTranslationContext Dim oOptions As NameValueMap oOptions = ThisApplication.TransientObjects.CreateNameValueMap If oSTEPTranslator.HasSaveCopyAsOptions(ThisApplication.ActiveDocument, oContext, oOptions) Then ' Set application protocol. ' 2 = AP 203 - Configuration Controlled Design ' 3 = AP 214 - Automotive Design oOptions.Value("ApplicationProtocolType") = 3 ' Other options... 'oOptions.Value("Author") = "" 'oOptions.Value("Authorization") = "" 'oOptions.Value("Description") = "" 'oOptions.Value("Organization") = "" oContext.Type = IOMechanismEnum.kFileBrowseIOMechanism Dim oData As DataMedium oData = ThisApplication.TransientObjects.CreateDataMedium oData.FileName = "C:\Users\USER\Desktop\" & Name & ".stp" oSTEPTranslator.SaveCopyAs(ThisApplication.ActiveDocument, oContext, oOptions, oData) End If Ich hoffe ihr versteht was ich gerne versuchen würde und könnt mir helfen. Danke bereits im Voraus! Lg.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
InventorSum Mitglied
 Beiträge: 8 Registriert: 05.12.2013
|
erstellt am: 06. Dez. 2013 08:51 <-- editieren / zitieren --> Unities abgeben:         
Hi, Problem wurde gelöst, wie gesagt nur ein kleines Problem. Musste nur den geänderten Parameter während der Regel aktualisieren und ins Modell übertragen. Mit dem Befehlt: RuleParametersOutput() Nun hätte ich aber eine andere Frage. Ist es möglich in das Inhaltscenter (beim platzieren von Bauteilen in einem Assambly) ein eigenes, benutzerdefiniertes Teil zu hinterlegen? Freue mich auf eure Antworten. Lg, Gregor Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Chris 31 Mitglied Konstrukteur und Mädchen für alles
  
 Beiträge: 575 Registriert: 23.04.2013 Inventor 2013/2015 Windows 7 64 bit 16GB RAM nVidia Quadro 600
|
erstellt am: 06. Dez. 2013 10:57 <-- editieren / zitieren --> Unities abgeben:          Nur für InventorSum
Hallo Gregor, ja, das ist möglich. Erstelle ein Bauteil(!), gehe unter die Registerkarte "Verwalten", und dort ist irgendwo Inhaltscenter. Da kannst dann das Bauteil(!) publizieren ins Inhaltscenter. Bauteil(!): Geht leider nur mit Bauteilen, nicht mit Baugruppen! Gruß Chris Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
InventorSum Mitglied
 Beiträge: 8 Registriert: 05.12.2013
|
erstellt am: 06. Dez. 2013 11:11 <-- editieren / zitieren --> Unities abgeben:         
Danke Chris, diese Möglichkeit habe ich auch gerade in Betracht gezogen, jedoch bekomme ich die Meldung dass keine Bibliothek konfiguriert wurde. Nach dem Versuch diese zu Konfigurieren (laut Hilfe) jedoch leider kein Erfolg. Gibt es irgendeinen Trick beim Konfigurieren der Bibliotheken? Lg Gregor Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Chris 31 Mitglied Konstrukteur und Mädchen für alles
  
 Beiträge: 575 Registriert: 23.04.2013 Inventor 2013/2015 Windows 7 64 bit 16GB RAM nVidia Quadro 600
|
erstellt am: 06. Dez. 2013 11:16 <-- editieren / zitieren --> Unities abgeben:          Nur für InventorSum
|
InventorSum Mitglied
 Beiträge: 8 Registriert: 05.12.2013
|
erstellt am: 06. Dez. 2013 11:17 <-- editieren / zitieren --> Unities abgeben:         
hmm ok, ja wie ich gesehen habe sind die ganzen bisherigen Bibliotheken schreibgeschützt. Habe eine neue angelegt die Schreib- und Lesezugriff hat. Jedoch kann ich auch dann das Bauteil nicht publizieren. Danke jedenfalls für deine Hilfe! Lg. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Chris 31 Mitglied Konstrukteur und Mädchen für alles
  
 Beiträge: 575 Registriert: 23.04.2013 Inventor 2013/2015 Windows 7 64 bit 16GB RAM nVidia Quadro 600
|
erstellt am: 06. Dez. 2013 11:19 <-- editieren / zitieren --> Unities abgeben:          Nur für InventorSum
|
InventorSum Mitglied
 Beiträge: 8 Registriert: 05.12.2013
|
erstellt am: 06. Dez. 2013 11:21 <-- editieren / zitieren --> Unities abgeben:         
Folgende Meldung erscheint: "Es wurde keine Bibliothek zum Lesen/Schreiben Konfiguriert. Überprüfen Sie die Konfiguration des Inhaltscenters und versuchen Sie es erneut". Wie gesagt, Bibliothek mit Lese-und Schreibzugriff wurde bereits angelegt, jedoch ohne Erfolg. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Chris 31 Mitglied Konstrukteur und Mädchen für alles
  
 Beiträge: 575 Registriert: 23.04.2013 Inventor 2013/2015 Windows 7 64 bit 16GB RAM nVidia Quadro 600
|
erstellt am: 06. Dez. 2013 11:23 <-- editieren / zitieren --> Unities abgeben:          Nur für InventorSum
|
InventorSum Mitglied
 Beiträge: 8 Registriert: 05.12.2013
|
erstellt am: 06. Dez. 2013 11:24 <-- editieren / zitieren --> Unities abgeben:         
|

| |
Chris 31 Mitglied Konstrukteur und Mädchen für alles
  
 Beiträge: 575 Registriert: 23.04.2013 Inventor 2013/2015 Windows 7 64 bit 16GB RAM nVidia Quadro 600
|
erstellt am: 06. Dez. 2013 11:33 <-- editieren / zitieren --> Unities abgeben:          Nur für InventorSum
Dann müsstest du dich leider an die großen Experten hier wenden. Oder den Beitrag mal im Inventor-Forum posten. Da habe ich schon öfter was darüber gelesen, die können dir auf jeden fall helfen. Gruß Chris Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |