| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: Material global ändern (4021 mal gelesen)
|
Schachinger Ehrenmitglied V.I.P. h.c. Konstrukteur
Beiträge: 2040 Registriert: 08.04.2002 AIS2009, PDSU 2012-2015, Plant 3D 2011-2015, NavisWorks 2010-2015, Win7 64bit SP1, Intel Core i7 870, 16 GB RAM, Quadro 2000D
|
erstellt am: 21. Mrz. 2003 14:09 <-- editieren / zitieren --> Unities abgeben:
Wie kann ich das Material für mehrere Bauteile gleichzeitig ändern? Hab im DA leider auch nichts gefunden denn mit "Eigenschaften übertragen" funkt das nicht (Material nicht in Liste).... der Organiser kopiert nur Eigenschaften in das Zielbauteil aber nicht in mehrere gleichzeitig. was nu? ------------------ mfg Siegfried Schachinger http://www.tbschatz.at Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
mtl3d Ehrenmitglied Konstrukteur
Beiträge: 1544 Registriert: 03.05.2002
|
erstellt am: 21. Mrz. 2003 15:28 <-- editieren / zitieren --> Unities abgeben: Nur für Schachinger
|
Schachinger Ehrenmitglied V.I.P. h.c. Konstrukteur
Beiträge: 2040 Registriert: 08.04.2002 AIS2009, PDSU 2012-2015, Plant 3D 2011-2015, NavisWorks 2010-2015, Win7 64bit SP1, Intel Core i7 870, 16 GB RAM, Quadro 2000D
|
erstellt am: 21. Mrz. 2003 15:32 <-- editieren / zitieren --> Unities abgeben:
|
Robby Lampe Mitglied
Beiträge: 1026 Registriert: 18.10.2000
|
erstellt am: 21. Mrz. 2003 15:52 <-- editieren / zitieren --> Unities abgeben: Nur für Schachinger
Keine globale Änderung aber ein Weg: Public Sub CrMat10037() Dim oPartDoc As PartDocument Set oPartDoc = ThisApplication.ActiveDocument Dim oNewMaterial As Material '----------------------------- ' entnommen aus Norm_x.ipt von Kasti ' 1.0037 St37-2 + Dichte 7.85 '----------------------------- Set oNewMaterial = oPartDoc.Materials.Add("1.0037 St37-2", 7.85) ' Längenausdehnungskoeffizient oNewMaterial.LinearExpansion = 1.2 ' Poissonsche Konstante oNewMaterial.PoissonsRatio = 0.287 ' Render-Stil oNewMaterial.RenderStyle = oPartDoc.RenderStyles.Item(1) ' Spez. Wärmekonstante oNewMaterial.SpecificHeat = 420 ' Wärmeleitfähigkeit oNewMaterial.ThermalConductivity = 47 ' Zugfestigkeit oNewMaterial.UltimateTensileStrength = 290 ' Streckgrenze oNewMaterial.YieldStrength = 180 ' Elastizitätsmodul oNewMaterial.YoungsModulus = 210 End Sub
Dieses Makro in die default.ivb (z.B.) ablegen und dazu ein Icon erzeugen. Und schon ist auf Knopfdruck das Material enthalten. gruß robby ------------------ gruß robby Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
daywa1k3r Moderator Softwareentwickler
Beiträge: 3497 Registriert: 01.08.2002 Alienware m17x, Win7, Inventor2012
|
erstellt am: 21. Mrz. 2003 16:06 <-- editieren / zitieren --> Unities abgeben: Nur für Schachinger
Hallo Schachinger, für einen der Lisp versteht, sollte VBA kein Problem sein. Aber nun mal zu deinem Problem: Du möchtest in einer Baugruppe die ipt's markieren und dann sagen, alle markierten ipt's sollen ein Material haben ? Wenn ja, das sollte programmierbar sein. Wenn nein, sage bitte wie Du dir das vorstellst. Bis dann... ------------------ Grüße daywa1k3r Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Charly Setter Ehrenmitglied V.I.P. h.c.
Beiträge: 11977 Registriert: 28.05.2002 Trau keiner Diva unter SP2....
|
erstellt am: 21. Mrz. 2003 17:21 <-- editieren / zitieren --> Unities abgeben: Nur für Schachinger
Hallo Wanderer Ich weiß nicht, ob´s genau das ist was der Siegfried sucht. Aber es ist genau das, was ich heute gebraucht habe Gruß Mathias PS: Kannst Du mir mal Dein Tool zur Übertragung von Gewicht etc. in die idw schicken ? Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
daywa1k3r Moderator Softwareentwickler
Beiträge: 3497 Registriert: 01.08.2002 Alienware m17x, Win7, Inventor2012
|
erstellt am: 21. Mrz. 2003 19:03 <-- editieren / zitieren --> Unities abgeben: Nur für Schachinger
Hallo Mathias, klar bekommst du das Tool. Kann aber Montag werden, da ich jetzt wirklich weg muss. Für das Material Problem habe ich mir sowas gedacht (siehe Anlage). Es wird aber auch wieder Montag bis es verfügbar wird. Sollte noch jemand Wünsche / Anregungen haben, bitte bis Montag äussern. Vielen Dank ------------------ Grüße daywa1k3r Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Robby Lampe Mitglied
Beiträge: 1026 Registriert: 18.10.2000
|
erstellt am: 21. Mrz. 2003 19:51 <-- editieren / zitieren --> Unities abgeben: Nur für Schachinger
Hi daywa1k3r, hast ja einen ungebändigten Tatendrang. Folgende Vorstellungen zum Projekt Materialaustausch: - Import der Daten über XML-/Excel-/OpenOffice-/CSV-Datei mit benutzerdefinierten Zusatzfelder(also von außen steuerbar) + Beispiel: physikalische Eigenschaften + TXT-Materialdatei- Wählbarkeit der Materialien (Vorzugsreihe der Firma) - vorbereitet für Oberflächentexturen (z.Z. Renderstil) ------------------ gruß robby Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Charly Setter Ehrenmitglied V.I.P. h.c.
Beiträge: 11977 Registriert: 28.05.2002 Trau keiner Diva unter SP2....
|
erstellt am: 21. Mrz. 2003 20:29 <-- editieren / zitieren --> Unities abgeben: Nur für Schachinger
Klingt ja gut.... Ich lasse mich überraschen. Wenn Du Beta-Tester brauchst, melde Dich. Hab am Wochenende noch nicht´s wichtiges vor. Gruß Mathias [Diese Nachricht wurde von Charly Setter am 21. März 2003 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Schachinger Ehrenmitglied V.I.P. h.c. Konstrukteur
Beiträge: 2040 Registriert: 08.04.2002
|
erstellt am: 22. Mrz. 2003 07:40 <-- editieren / zitieren --> Unities abgeben:
hi @all! wow so viel Beiträge - hätte wohl gestern nochmal reinschaun sollen @daywa1k3r ja Lisp hab ich mir selbst (bzw. mit Hilfe von cad.de und Web-Tutorials) zumindest so weit beigebracht das ich eben solch ähnliche Sachen in ACAD locker hinbekomme. Ich schmökere auch seit ein paar Wochen durch diverse VB-Bücher aber mir fehlt derzeit einfach die Zeit mich intensiv damit zu beschäften, den Samstag verbring ich ja auch im Büro *G* - aber ich hoff das wird mal! Aber du hast genau erfasst was ich gemeint habe - IPT's markieren, Material auswählen, fertig... Ich hatte so gehofft das im DA etwas derartiges möglich ist ------------------ mfg Siegfried Schachinger http://www.tbschatz.at Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
thomas109 Ehrenmitglied V.I.P. h.c. Dompteur
Beiträge: 9343 Registriert: 19.03.2002 Dell620s i5 Geforce GT 620 6GB;Lenovo X240; Citrix Desktop; Lenovo S30; IV 4 - 2009 RIP, aktiv 2010 - 2023 produktiv AIS2020.4 +PartSolutions / ECTR AICE .
|
erstellt am: 22. Mrz. 2003 11:28 <-- editieren / zitieren --> Unities abgeben: Nur für Schachinger
|
daywa1k3r Moderator Softwareentwickler
Beiträge: 3497 Registriert: 01.08.2002 Alienware m17x, Win7, Inventor2012
|
erstellt am: 22. Mrz. 2003 11:35 <-- editieren / zitieren --> Unities abgeben: Nur für Schachinger
Hallo Robby, Zitat: - Import der Daten über XML-/Excel-/OpenOffice-/CSV-Datei mit benutzerdefinierten Zusatzfelder(also von außen steuerbar)
Ja, das ist möglich, nur "Daten" ist ein sehr breiter Begriff. Material Definitionen können allerdings nur aus einer ipt ausgelesen werden. Siehe dein Makro oben, das alles gehört zu einer Material Definition. Ich bevorzuge folgenden Weg: die ganzen Informationen in einer ipt speichern (hallo Kasti ) und danach mit dem Programm die komplete Material Definitionen aus der Datei auslesen. Zitat: + Beispiel: physikalische Eigenschaften
Ich konnte das Programm nicht starten, weil ich es erwerben muss, um es starten zu können. Aber den Meldungen zu Folge gehe ich davon aus, dass das Programm das Volumen und Gewicht in die Benutzer-Eigenschaften einträgt. Hat eigentlich mit unseren Material Problem nur wenig zu tun. Zitat: + TXT-Materialdatei
Dein Makro da oben, geschickt in einer Schleife eingepackt meistert die Aufgabestellung. Zitat: - Wählbarkeit der Materialien (Vorzugsreihe der Firma)
Ja, das hat was mit unserem Problem zu tun. Das Programm Material_Global.exe (wird Heute getestet) deckt die gleichen Anforderungen. Zitat: - vorbereitet für Oberflächentexturen (z.Z. Renderstil)
Klar möglich, aber wir wollen es doch nicht übertreiben. Ich werde hier posten, sobald das Programm alltagstauglich ist. @Thomas Eine dll ist nicht lesbar. Bis dahin... ------------------ Grüße daywa1k3r Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Robby Lampe Mitglied
Beiträge: 1026 Registriert: 18.10.2000
|
erstellt am: 22. Mrz. 2003 13:55 <-- editieren / zitieren --> Unities abgeben: Nur für Schachinger
Hallo daywa1k3r, die beide Beispiele sind nur Programmiervorschläge. 1. Excel-Datei als INI-Datei 2. TXT als Import-Vorlage, z.B. mit einem kleinen Makro im Excel schnell veränderbar Mach einen Vorschlag und dann prüft testet jeder aus seinem Blickwinkel.
------------------ gruß robby Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Charly Setter Ehrenmitglied V.I.P. h.c.
Beiträge: 11977 Registriert: 28.05.2002 Trau keiner Diva unter SP2....
|
erstellt am: 04. Aug. 2003 21:57 <-- editieren / zitieren --> Unities abgeben: Nur für Schachinger
|