| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für PTC CREO |
Autor
|
Thema: X, Y Koordinaten aller Elemente einer Zeichnung vergleichen (986 mal gelesen)
|
Mark E Mitglied Ingenieur
Beiträge: 15 Registriert: 09.08.2012 OSDD V15.5 Solid Works 2010 PE CATIA V5R16 ACAD 2011
|
erstellt am: 09. Aug. 2012 13:18 <-- editieren / zitieren --> Unities abgeben:
Hallo, ich bin gerade dabei ein Makro zu schreiben, in dem ich verschiedene Arbeitsschritte automatisiere. Bei einem Arbeitsschritt benötige ich Hilfe: Ich möchte alle Elemente auf einer Zeichnung durch ein Makro mit 4 Linien eingrenzen (2 Horizontale und 2 Vertikale) Meine Idee ist: Ich suche die Koordinaten der Punkte mit dem kleinsten(größten) X-Wert und kleinsten(größten) Y-Wert. Aus diesen 4 Punkten, kann ich dann meine Rahmenlinien erstellen. Kann mir jemand eine Hilfestellung geben, wie ich die Koordinaten abfragen und vergleichen kann? Vielen Dank für Hilfe Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
riesi Mitglied CAD-Admin, SolidWorks-Backend-Developer
Beiträge: 1016 Registriert: 06.05.2002 SolidWorks 2020-Sp5 OneSpaceDrafting V20.5 MS-Windows 10 Prof. 64Bit Core i7-6700 @ 3.40 GHz 32,00 GB RAM ATI WX 5100
|
erstellt am: 09. Aug. 2012 13:38 <-- editieren / zitieren --> Unities abgeben: Nur für Mark E
|
Patrick Weber Mitglied Konstruktionstechniker, Admin
Beiträge: 657 Registriert: 20.11.2006 Win7 Pro SP1 64Bit HP Z230, Core i5, 8GB RAM, nv Quadro K600 Creo Elements/Direct 19.0 M010 ModelManager 19.0 M010 clisp,VB.net,VBA,AHK,php,javascript
|
erstellt am: 09. Aug. 2012 13:45 <-- editieren / zitieren --> Unities abgeben: Nur für Mark E
Musst du nicht, es geht viel einfacher über die oberste Teileebene. Code: DEFINE UMRAHMENLOCAL UNTENLINKS LOCAL OBENRECHTS EDIT_PART TOP INQ_ENV 7 LET UNTENLINKS (INQ 101) LET OBENRECHTS (INQ 102) LINE TWO_PTS UNTENLINKS (PNT_XY (X_OF UNTENLINKS) (Y_OF OBENRECHTS)) END LINE TWO_PTS (PNT_XY (X_OF UNTENLINKS) (Y_OF OBENRECHTS)) OBENRECHTS END LINE TWO_PTS OBENRECHTS (PNT_XY (X_OF OBENRECHTS) (Y_OF UNTENLINKS)) END LINE TWO_PTS (PNT_XY (X_OF OBENRECHTS) (Y_OF UNTENLINKS)) UNTENLINKS END END_DEFINE
------------------
Patrick Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
friedhelm at work Mitglied Techniker Aluminium Profile
Beiträge: 882 Registriert: 01.04.2003 Creo Elements Direct /Drafting 17+20.x ui classic-Tablett + Ribbon, Modeling 17-20.0,.2,.4,.5 Lizenz auf USB-Netzwerkadapter PE-Express 8 Win 10 Enterprise 64 @work Win 10 Pro 64 @home Notepad++,IrfanView,eDrawings, ....
|
erstellt am: 09. Aug. 2012 13:50 <-- editieren / zitieren --> Unities abgeben: Nur für Mark E
Hallo Mark, das geht mit INQ_SELECTED_ELEM und der passenden Auswahl der Elemente. Das kannst du HIER nachlesen. edit: Das gilt für alle Elemente aber jedes wird einzeln analysiert. ------------------ Gruss Friedhelm
[Diese Nachricht wurde von friedhelm at work am 09. Aug. 2012 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Mark E Mitglied Ingenieur
Beiträge: 15 Registriert: 09.08.2012 OSDD V15.5 Solid Works 2010 PE CATIA V5R16 ACAD 2011
|
erstellt am: 09. Aug. 2012 13:57 <-- editieren / zitieren --> Unities abgeben:
|
Mark E Mitglied Ingenieur
Beiträge: 15 Registriert: 09.08.2012 OSDD V15.5 Solid Works 2010 PE CATIA V5R16 ACAD 2011
|
erstellt am: 10. Aug. 2012 08:04 <-- editieren / zitieren --> Unities abgeben:
Und wie erwartet, haben die Tipps/Makros funktioniert. Vielen Dank für die Hilfe. Nun ärgert man sich doch, dass man den entsprechenden Forenbeitrag nicht vorher gelesen hat.
[Diese Nachricht wurde von Mark E am 10. Aug. 2012 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
friedhelm at work Mitglied Techniker Aluminium Profile
Beiträge: 882 Registriert: 01.04.2003 Creo Elements Direct /Drafting 17+20.x ui classic-Tablett + Ribbon, Modeling 17-20.0,.2,.4,.5 Lizenz auf USB-Netzwerkadapter PE-Express 8 Win 10 Enterprise 64 @work Win 10 Pro 64 @home Notepad++,IrfanView,eDrawings, ....
|
erstellt am: 10. Aug. 2012 11:28 <-- editieren / zitieren --> Unities abgeben: Nur für Mark E
Hallo Mark, mir ist nicht deutlich geworden, was das Ziel deines Macros ist. Geht es darum 2 Zeichnungen zu vergleichen? Da hat Drafting mit seiner Änderungsstandkontrollfunktion doch was Tolles zu bieten. ------------------ Gruss Friedhelm Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
riesi Mitglied CAD-Admin, SolidWorks-Backend-Developer
Beiträge: 1016 Registriert: 06.05.2002 SolidWorks 2020-Sp5 OneSpaceDrafting V20.5 MS-Windows 10 Prof. 64Bit Core i7-6700 @ 3.40 GHz 32,00 GB RAM ATI WX 5100
|
erstellt am: 10. Aug. 2012 11:44 <-- editieren / zitieren --> Unities abgeben: Nur für Mark E
Zitat: Original erstellt von friedhelm at work: Hallo Mark, mir ist nicht deutlich geworden, was das Ziel deines Macros ist.
Ich brauche die Funktion nur, um für die Ausgabe als PDF das richtige Blattformat ein zu stellen. Damit bekomme ich dann ein maßstäbliches PDF erzeugt und mein Kunde/Lieferant hat die Chance das PDF in Originalgröße auszudrucken. Viele quetschen das einfach in A4 Quer ein, was nach meiner Meinung nicht korrekt ist. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Mark E Mitglied Ingenieur
Beiträge: 15 Registriert: 09.08.2012 OSDD V15.5 Solid Works 2010 PE CATIA V5R16 ACAD 2011
|
erstellt am: 10. Aug. 2012 12:35 <-- editieren / zitieren --> Unities abgeben:
Hallo Friedhelm, ich schreibe ein Makro, welches eine bestehende Zeichnung so umwandelt, dass die Zeichnung entsprechende Kundenvorgaben erfüllt. Eine dieser Forderungen ist ein entsprechender Rahmen aus 4 Linien. Am Ende der Umwandlung steht dann die Konvertierung von .mi zu .dxf mit entsprechender Layer-Struktur und allen erfüllten Forderungen. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |