Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  Inventor
  Material global ändern

  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Thema geschlossen  Thema geschlossen!
Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

Dieser Beitrag ist erfolgreich in das Forum INVENTOR VBA verschoben worden.

nächster neuer Beitrag | nächster älterer Beitrag
  
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



Sehen Sie sich das Profil von Schachinger an!   Senden Sie eine Private Message an Schachinger  Schreiben Sie einen Gästebucheintrag für Schachinger

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 oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

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


Sehen Sie sich das Profil von mtl3d an!   Senden Sie eine Private Message an mtl3d  Schreiben Sie einen Gästebucheintrag für mtl3d

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 oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Schachinger 10 Unities + Antwort hilfreich

Hallo,

was Du sicher nicht wissen willst ist, daß ich vor diese Wand auch schon gelaufen bin. Daher sind alle möglichen Werkstoffe in unseren Vorlagen.

so long

Achim

------------------
MTL GmbH, Ingenieurbüro, Maschinenentwicklung für die Lebensmittelindustrie und Pharmazie

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

Schachinger
Ehrenmitglied V.I.P. h.c.
Konstrukteur



Sehen Sie sich das Profil von Schachinger an!   Senden Sie eine Private Message an Schachinger  Schreiben Sie einen Gästebucheintrag für Schachinger

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 oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Jede Info ist besser als keine Info 

Irgendwann werd ich doch mal mit VBA anfangen... schade das es im IV kein Lisp gibt *lol*

P.S.: das war durchaus eine Drohung *G*

------------------
mfg Siegfried Schachinger
http://www.tbschatz.at

[Diese Nachricht wurde von Schachinger am 21. März 2003 editiert.]

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

Robby Lampe
Mitglied



Sehen Sie sich das Profil von Robby Lampe an!   Senden Sie eine Private Message an Robby Lampe  Schreiben Sie einen Gästebucheintrag für Robby Lampe

Beiträge: 1026
Registriert: 18.10.2000

erstellt am: 21. Mrz. 2003 15:52    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Schachinger 10 Unities + Antwort hilfreich

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



Sehen Sie sich das Profil von daywa1k3r an!   Senden Sie eine Private Message an daywa1k3r  Schreiben Sie einen Gästebucheintrag für daywa1k3r

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 oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Schachinger 10 Unities + Antwort hilfreich

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





Sehen Sie sich das Profil von Charly Setter an!   Senden Sie eine Private Message an Charly Setter  Schreiben Sie einen Gästebucheintrag für Charly Setter

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 oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Schachinger 10 Unities + Antwort hilfreich

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



Sehen Sie sich das Profil von daywa1k3r an!   Senden Sie eine Private Message an daywa1k3r  Schreiben Sie einen Gästebucheintrag für daywa1k3r

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 oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Schachinger 10 Unities + Antwort hilfreich


Forum_Material.gif

 
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



Sehen Sie sich das Profil von Robby Lampe an!   Senden Sie eine Private Message an Robby Lampe  Schreiben Sie einen Gästebucheintrag für Robby Lampe

Beiträge: 1026
Registriert: 18.10.2000

erstellt am: 21. Mrz. 2003 19:51    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Schachinger 10 Unities + Antwort hilfreich

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





Sehen Sie sich das Profil von Charly Setter an!   Senden Sie eine Private Message an Charly Setter  Schreiben Sie einen Gästebucheintrag für Charly Setter

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 oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Schachinger 10 Unities + Antwort hilfreich

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



Sehen Sie sich das Profil von Schachinger an!   Senden Sie eine Private Message an Schachinger  Schreiben Sie einen Gästebucheintrag für Schachinger

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 oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

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




Sehen Sie sich das Profil von thomas109 an!   Senden Sie eine Private Message an thomas109  Schreiben Sie einen Gästebucheintrag für thomas109

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 oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Schachinger 10 Unities + Antwort hilfreich

Zwischenfrage vom Unwissenden:
Das Tool StandardPartProperties von Thomas Richter amcht ja sowas mit den Normteilen.
So ähnlich sollte es jetzt für Teile laufen. Kann man in der dll lesen und sich Ideen holen?
Oder ist der Inhalt durch Kompilieren unlesbar geworden?

Schönes Wochenende!

------------------
lg 
Tom
             
mcds Datensystem GmbH

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

daywa1k3r
Ehrenmitglied V.I.P. h.c.
Softwareentwickler



Sehen Sie sich das Profil von daywa1k3r an!   Senden Sie eine Private Message an daywa1k3r  Schreiben Sie einen Gästebucheintrag für daywa1k3r

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 oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Schachinger 10 Unities + Antwort hilfreich

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



Sehen Sie sich das Profil von Robby Lampe an!   Senden Sie eine Private Message an Robby Lampe  Schreiben Sie einen Gästebucheintrag für Robby Lampe

Beiträge: 1026
Registriert: 18.10.2000

erstellt am: 22. Mrz. 2003 13:55    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Schachinger 10 Unities + Antwort hilfreich

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

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag öffnen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2024 CAD.de | Impressum | Datenschutz