|
CATIA V5 Programmierung : Booleschen Parameter umschalten
Booyaka am 14.08.2018 um 11:06 Uhr (1)
Hallo Ich hätte da mal ein kleines Problem und zwar möchte ich über ein Makro sämtliche Bohrung ausblenden lassen und es anschließend in einem anderen Format exportieren lassen.Dazu hab ich ein booleschen Parameter mit dem Namen "Bohrung_Aktiv"diesen möchte ich auf "false" stellen um die Bohrungen zu inaktivieren.Nur leider funktioniert das nicht mit dem Ausschalten der Bohrung.(Ich meine aber das es bei mir ca vor 10min mal funktioniert hat nur weiß ich nicht was ich geändert hab . )Code:Set oActDoc = CAT ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Verschiedene CadParts erstellen und speichern unter
TaMueller am 07.07.2016 um 16:43 Uhr (1)
Hallo Ich bin ganz neu dabei bei der Programmierung also seid bitte nachsichtig Und zwar möchte ich mehrere CADParts aus einer Designtabelle(vorhanden) erzeugen und unter bestimmtem Namen abspeichern.Ich hab eine Laufvariabel i eingeführt und hoffe das funktioniert auch so. Wenn nicht bitte bescheid geben.Leider bekomme ich folgende Fehlermeldung: Beschreibung: Anweisungsende erwartet (also bei dem SaveAs)Vielen Dank für die Hilfe!Hier mein Quellcode:Language="VBSCRIPT"Sub CATMain()Set i=1for i=1 to 5 Set ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : klasse des Shape?
leipziger am 29.11.2005 um 09:52 Uhr (0)
Halloweis jemand wie ich von einem Objekt (Pad oder Assemble) der Oberklasse Shape die Klasse rausfinden kann und diese in der If Then Else Bedingung abfragen kann? Mein Problem ist das ich ein Marco schreibe welches alle Bodies sucht und das darüber liegende AssemblyFeature genau so wie den Body benennt. So bald aber im Body ein Shape gefunden wird was nicht für Klasse BooleanShape gehört, das Marco nicht mehr funktioniert.hier ist meine ProbedateiDim partDocument1 As PartDocumentDim part1 As PartDim body ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Koordinaten von Achsensystemen aller Parts eines Produktes auslesen
CatiaV5User am 12.06.2007 um 14:26 Uhr (0)
Hallo Kollegen, ich brauche eure Hilfe!Ich möchte die Koordinaten der Achsensysteme aller Parts vom Hauptprodukt bezüglich des globalen Koordinatensystems auslesen. Folgendes habe ich mir dazu überlegt:Sub CATMain()Analysieren(CATIA.ActiveDocument.Product)End SubSub Analysieren (P As Product) Set oRefDoc = p.ReferenceProduct.Parent If TypeName(oRefDoc) = "PartDocument" Then Set part1 = oRefDoc.Part Dim axisSystems1 As AxisSystems Set axisSystems1 =part1.AxisSystems Dim axisSystem1 As AxisSystem Dim ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Script für Boolsche Operationen
JZühlke am 28.04.2022 um 14:12 Uhr (5)
Hallo zusammen,Zum ersten Mal überhaupt habe ich kein Thema zu einer Frage gefunden, die mich bei der CATIA-Programmierung aufgehalten hat. Ich bin mir aber sicher, dass es kein ungewöhnliches Problem ist, sondern dass ich nur den Thread nicht gefunden habe. Hier also mein Problem:Wir wollen von allen Bauteilen bzw. deren 3D-Modellen das Volumen bestimmen. Wegen unterschiedlicher Datenqualität (historisch gewachsen, Zulieferer mit anderen Methoden,...) gibt es keine eindeutige Struktur in den .CATParts, wi ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Feature erzeugen
MaxZ am 14.07.2005 um 16:24 Uhr (0)
jo, kamman! Per kleiner Verschachtelung und mit IF und NEXT. Sieht dann ungefähr so aus: Sub CATMain() Dim body_array() As String Set partDocument1 = CATIA.ActiveDocument Set selection1 = partDocument1.Selection Selection aller Koerper selection1.Search "((CATStFreeStyleSearch.BodyFeature + CATPrtSearch.BodyFeature) + CATGmoSearch.BodyFeature),all" Zählen der Elemente der Selection1 bodycount = selection1.Count ReDim body_array(bodycount) ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Wie Eigenschaften für Messen festlegen?
noir333 am 05.05.2008 um 20:16 Uhr (0)
Hallo sbtSDA,also ich denke Du hast 2 Möglichkeiten:1. Du schaffst es irgendwie den Kreis in eine beliebige Curve (CurveDatum) umzuwandeln, so dass er vergisst, dass es ein Kreis war. Ich weiß leider nicht wie, Catia ist da ziemlich clever um den Kreis immer zu erkennen.2. Etwas umständlich ist eine Methode, die ich schon mal verwendet habe. Du nutzt nicht measurable sondern eine "echte Messung"! Vorgehen:Erzeuge Dir eine neue Datei, in der Du eine Kurve und ein Extract von der Kurve erzeugst. Außerdem mus ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Part in NC-Umgebung versetzen
Bappnaas am 14.01.2010 um 15:08 Uhr (0)
Mit deinem Vorschlag gehts auch nicht...Das Problem ist, dass das aufgenommene Makro den Namen fest vorgibt. Dies will ich, wie gesagt, durch eine Selection ersetzen.Hier der aufgenommene Code:Code:Dim processDocument1 As ProcessDocumentSet processDocument1 = CATIA.ActiveDocumentDim product1 As ProductSet product1 = processDocument1.GetItem("PPRProduct")Dim products1 As ProductsSet products1 = product1.ProductsDim product2 As ProductSet product2 = products1.Item("Item.1")Dim products2 As ProductsSet produc ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : In Drawing einen Auschnitt machen
bgrittmann am 17.11.2013 um 22:21 Uhr (1)
ServusWillkommen im Forum. Bitte Systeminfo ausfüllen.Wie würdest du das manuell machen?Für die Erstellung eines Ausbruchs liefert dir der Makrorekorder solch einen Code:Code:Sub CATMain()Dim drawingDocument1 As DrawingDocumentSet drawingDocument1 = CATIA.ActiveDocumentDim drawingSheets1 As DrawingSheetsSet drawingSheets1 = drawingDocument1.SheetsDim drawingSheet1 As DrawingSheetSet drawingSheet1 = drawingSheets1.ActiveSheetDim drawingViews1 As DrawingViewsSet drawingViews1 = drawingSheet1.ViewsDim drawing ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Referenzlink aus Drawing
K.Siebert am 12.03.2009 um 18:57 Uhr (0)
Hallo,so könnte das Aussehenich lese mir den Pfad zum Part/Product über die Vorderansicht aus.Code:__________________Ansicht bestimmen_________________________________Dim oDrwDocument As DocumentSet oDrwDocument = CATIA.ActiveDocumentDim oDrwSheets As DrawingSheetsSet oDrwSheets = oDrwDocument.SheetsDim oDrwSheet As DrawingSheetoDrwDocument.Sheets.Item(1).ActivateSet oDrwSheet = oDrwSheets.ActiveSheetDim oViews As DrawingViewsSet oViews = oDrwSheet.ViewsDim oView As DrawingViewSet oView = oViews.ActiveView ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Pfadproblem
RSchulz am 23.03.2011 um 14:35 Uhr (0)
Hallo Michael,du machst einen Fehler, den viele begehen. Du gehst davon aus, dass das funktionieren muss, weil es woanders ja auch funktioniert. Wenn du die Systemvariable mit der Syntax (%...%) angibst, dann erkennt das Betriebssystem, dass dieser Werte für eine Variable steht, sucht diese und liest diese, wenn vorhanden, aus. Das ist eine Funktion, die in diesem Element integriert ist. Bei den einzelnen vba-Funktionen ist das allerdings nicht der Fall. Du musst also vor der Anwendung diesen Wert aus dem ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Erstellung von geöffneten Körpern
Tibby am 19.09.2003 um 11:11 Uhr (0)
Hallo Leute! Ich möchte per VB eine Ansammlung von Linien und Punkten in geöffneten Körpern erstellen, die eine hierarchische Struktur bilden. Sprich: Ein geöffneter Körper soll einen o. mehrere andere geöffnete/n Körper beeinhalten. Denkbar wäre auch die Erstellung mehrere Körper in einem Dokument, in denen dann die geöffneten Körper abgelegt werden. Mit der Workbench Generative Shape Design lässt sich soetwas ja (per Hand) erstellen, in dem man Einfügen , Offener Körper anklickt und dann unter Über ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Auswahl in Makro einfügen
V5Playaz am 12.09.2008 um 12:29 Uhr (0)
Hallo Jens,so sollte eine Auswahl möglich sein:Code:Language="VBSCRIPT"Sub CATMain()Dim productDocument1 As DocumentSet productDocument1 = CATIA.ActiveDocumentDim selection1 As SelectionSet selection1 = productDocument1.Selection msgInput = MsgBox("Alle Constraints ausblenden?", vbYesNoCancel, "Constraints")If msgInput = vbYes Then selection1.Search "CATAsmSearch.MfConstraint,all" Set visPropertySet1 = selection1.VisProperties visPropertySet1.SetShow 1end ifmsgInput = MsgBox("Alle Achsen ausblenden?", vbY ...
|
| In das Form CATIA V5 Programmierung wechseln |
