| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| Maximale Kostenkontrolle mit einer gekauften Lizenz für Ihre CAD-Software |
Autor
|
Thema: Material global ändern (972 mal gelesen)
|
Schachinger Ehrenmitglied V.I.P. h.c. Konstrukteur
Beiträge: 2041 Registriert: 08.04.2002 Inventor 2019, Win10, Intel Core i7-9700 @ 3.00GHz, 64 GB RAM, Quadro K2000D
|
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 Pro/E Wildfire, Mechanica, Acad, Inventor, 3DS-MAX, NT, W2K, XP, Linux
|
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: 2041 Registriert: 08.04.2002 Inventor 2019, Win10, Intel Core i7-9700 @ 3.00GHz, 64 GB RAM, Quadro K2000D
|
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 Ehrenmitglied V.I.P. h.c. Softwareentwickler
Beiträge: 3497 Registriert: 01.08.2002 Desktop: 3.3GHz;8GB;SSD OCZ Vertex 3;Gainward Phantom GTX570 Laptop: Alienware m17x Win7, Inventor2012 64Bi
|
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 Moderator
Beiträge: 11977 Registriert: 28.05.2002 Der vernünftige Mensch paßt sich der Welt an; der unvernünftige besteht auf dem Versuch, die Welt sich anzupassen.<P>Deshalb hängt aller Fortschritt vom unvernünftigen Menschen ab. (George Bernard Shaw)
|
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 Ehrenmitglied V.I.P. h.c. Softwareentwickler
Beiträge: 3497 Registriert: 01.08.2002 Desktop: 3.3GHz;8GB;SSD OCZ Vertex 3;Gainward Phantom GTX570 Laptop: Alienware m17x Win7, Inventor2012 64Bi
|
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 Moderator
Beiträge: 11977 Registriert: 28.05.2002 Der vernünftige Mensch paßt sich der Welt an; der unvernünftige besteht auf dem Versuch, die Welt sich anzupassen.<P>Deshalb hängt aller Fortschritt vom unvernünftigen Menschen ab. (George Bernard Shaw)
|
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: 2041 Registriert: 08.04.2002 Inventor 2019, Win10, Intel Core i7-9700 @ 3.00GHz, 64 GB RAM, Quadro K2000D
|
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 Moderator Dompteur
Beiträge: 9350 Registriert: 19.03.2002 Dell620s i5 Geforce GT 620 6GB;Lenovo X240; Citrix Desktop; Lenovo S30; IV 4 - 2009 RIP, aktiv 2010 - 2023 produktiv AIS2023.3 +PartSolutions / ECTR AICE .
|
erstellt am: 22. Mrz. 2003 11:28 <-- editieren / zitieren --> Unities abgeben: Nur für Schachinger
|
daywa1k3r Ehrenmitglied V.I.P. h.c. Softwareentwickler
Beiträge: 3497 Registriert: 01.08.2002 Desktop: 3.3GHz;8GB;SSD OCZ Vertex 3;Gainward Phantom GTX570 Laptop: Alienware m17x Win7, Inventor2012 64Bi
|
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 |