Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  CATIA V5 Programmierung
  UserPattern kopieren

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

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
Autor Thema:  UserPattern kopieren (1752 mal gelesen)
Azat
Mitglied


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

Beiträge: 5
Registriert: 24.06.2011

VB.Net / CATIA v5 R19

erstellt am: 08. Jul. 2011 11:16    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

Hallo,
Bin neu hier und benötige hilfe
Ichhabe ein Makro geschreiben, das alle Bohrungen und UserPatterns von einem body eines parts in einen anderen body kopiert. bei Bohrungen ist das kein Problem.
Bei UserPatterns ist das Problem, dass copy verboten ist. Meine Idee war die Sketch des patterns zu kopieren und auf den ersten punkt der sketch eine Bohrung mit den eigenschaften der Bohrung des ursprünglichen patterns zu setzen und dann ein neues Pattern zu erstellen. Soweit funktioniert das auch ganz gut.
Jetzt mein Problem:
Wenn in einem UserPattern weniger positions aktiviert sind als Punkte in der sketch vorhanden sind und das makro die sketch kopiert und ein neues pattern erstellt wird dieses neue pattern alle punkte der sketch als positions benutzen und daher mehr positions haben als das ursprüngliche pattern.
Gibt es eine möglichkeit herauszufinden welche punkte einer skizze von einem pattern tatsächlich benutzt werden ? Die entsprechenden punkte könnte man dann mit .DesactivatePositions deaktivieren oder ganz löschen.

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

Azat
Mitglied


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

Beiträge: 5
Registriert: 24.06.2011

VB.Net / CATIA v5 R19

erstellt am: 12. Jul. 2011 16:02    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

Bin etwas weiter gekommen:
Ich lasse das Makro im UserPattern nach Edges suchen und dann mit CenterPoint Punkte ertsellen. Jetzt müsste ich nur noch den Abstand zwischen den erzeugten Punkten und den Punkten der Skizze messen dann könnte ich aussortieren welcher punkt der skizze benutzt wird. Hat jemand eine Idee wie das am Besten funktioniert? Mit GetCoordinates ist ungünstig wegen Koordinaten umrechnen.

[Diese Nachricht wurde von Azat am 15. Jul. 2011 editiert.]

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

meisterlumpi
Mitglied



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

Beiträge: 118
Registriert: 15.04.2011

Intel Core2 Quad Q6600 2.40 GHz | 4 GB RAM | Win7x64

erstellt am: 23. Jul. 2011 07: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 Azat 10 Unities + Antwort hilfreich

Hallo Azat

zum Messen könntest du die SPAWorkbench verwenden.

Code:

Dim reference1 As Reference
  Set reference1 = part1.CreateReferenceFromObject(Punkt1)
Dim reference2 As Reference
  Set reference2 = part1.CreateReferenceFromObject(Punkt2)

Dim TheSPAWorkbench As Workbench
  Set TheSPAWorkbench = CATIA.ActiveDocument.GetWorkbench("SPAWorkbench")

Dim TheMeasurable As Measurable
  Set TheMeasurable = TheSPAWorkbench.Measurable(reference1)

Dim minDistance As Double
  minDistance = TheMeasurable.GetMinimumDistance(reference2)


wie du die reference1 und reference2 erstellst sollte eigentlich egal sein, CreateReferenceFromName(..) z.B. sollte genauso funktionieren.

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
Antwort erstellen


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

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

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

(c)2023 CAD.de | Impressum | Datenschutz