---

Hallo CAD-Forenmitglieder,

Ich bin neu hier und habe sogleich eine Frage.

Zur info.
Ich arbeite seit ca. 8 Jahren mit NX (UG V15/V17 NX3 NX5 und nun NX6) im CAM bereich.
Mir VB.NET und VB6 habe ich schon einige kleine Projekte gemacht.

Nun meine Frage, Aufgabenstellung.

Anhand einer Excel Tabelle soll ich ca. 200 Unterschiedliche Drehkörper Modellieren.

Meine IDEE:

Ich mache mir für jeden Drehkörper eine Text Datei mit den Koordinaten.

Z.B D20 Länge 30.

X0 Y0
X10 Y0
X10 Y30
X0 Y30
X0 X0 (Mitte)

Natürlich sind die Drehkörper ich so einfach wie hier im beispiel.

Nund müste ich doch nur Linen anhand dieser Koordinaten Zeichnen und diese dan Rotieren.

OK, in der theorie hört sich das einfach an.
Nur in der Praxis habe ich eine ahnung wie man im Journal so etwas umsetzt.

Wie ich die Text Datein hinbekomme mache ich mir keine sorgen.
Diese mittels JOurnal zu öffnen und durch eine schleife zu jagen ist für mich auch noch machbar.
Nur WIE Zecihne ich Linden oder Radien  und vorallem, wie kann ich diese anschliesend rotieren.
Könnte mir da bitte  einer ein beispiel zeigen.

So einfach 4 bis 5 Linden Zeichnen und diese dann rotieren.

Oder ist das mit meiner theorie doch nicht so einfach wie ich mir das vorstelle.

mfg
Markus Wüst

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

---

Hallo Markus,

zunächst mal herzlich willkommen hier im Forum. Zu Deiner(n) Frage(n): Hast Du schon mal versucht, den Ablauf aufzuzeichnen ? Mit assoziativen Linien oder im Sketcher sollte das gehen, nichtassoziative Kurven werden m.W. nicht aufgezeichnet. Der Rotationskörper wiederum ist mit einiger Sicherheit beim Record dabei. Was dann noch fehlt, ist die Umsetzung der Tabelle in Kurven. Das sollte auch direkt aus Excel heraus gehen, ohne den Weg über Textdateien.
Das ganze ist in der Theorie zunächst recht einfach, mit Aufzeichnen und Abspielen kriegst Du das bestimmt beispielhaft (für ein Teil) hin. Die praktische Umsetzung, d.h. die Koordinaten so in dieses Beispiel zu übertragen, daß es in einer Schleife läuft, wird dann schon schwieriger und auch schätzungsweise ein paar Tage dauern.

Gruß, Michael

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

---

Hallo-
wenn schon eine Exceltabelle vorhanden ist, könnte man das
mit einer Teilefamilie auch lösen?

MFG

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

---

DANKE Für die schnellen Antworten,

Das mit dem aufzeichnen habe ich schon versucht. nur ist mein Problem das wenn ich eine Line erzeugt habe ich diese für das Rotieren
auch erneut aufwählen muss.

Line erzeugen:
Dim startPoint1 As Point3d = New Point3d(0.0, 0.0, 0.0)
Dim endPoint1 As Point3d = New Point3d(10.0, 0.0, 0.0)
Dim line1 As Line
line1 = workPart.Curves.CreateLine(startPoint1, endPoint1)

Aber wie gebe ich dieser Linie nun eine ID/Namen. Z.B l1 die nächsete l2
Ich sollte ja im zweiten schritt beim rotieren sagen können:

rotiere mir L1 L2 L3 L4 um die Mitte L4

mfg

Markus

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

---

Hallo Markus,

denk' nicht so kompliziert  , Du hast die Linie doch schon: line1 ist das erzeugte Objekt vom Typ NXOpen.Line. Wenn Du ihr noch einen Namen geben willst, geht das ganz einfach mit:

line1.setname("blabla")

B.t.W.: Verwendest Du einen Texteditor oder eine Entwicklerumgebung für's Schreiben ?

Gruß, Michael

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