|
CATIA V5 Programmierung : Parameter überprüfen ob vorhanden
AndreeX00X am 17.08.2007 um 11:30 Uhr (0)
Hallo YellowDevil,ich habe deinen Tipp mal ausprobiert, jedoch gibt mir VB den Fehler schon in der Zeile mit der For-Schleife an: Zitat:Laufzeitfehler 424Objekt erforderlichIch habe auch noch mal nachgeschaut, ob ich nicht das Ende für die For-Schleife vergessen habe (z.B. End For), so etwas gibt es aber nicht. Also kann es daran schon mal nicht liegen.Ich könnte mir jetzt nur noch vorstellen, dass ich es an die falsche Stelle gesetzt habe, jedoch wüsste ich nicht, wo ich es sonst hinsetzen sollte.Code:Sub ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Elemente aus Geometrischen Set in txt-File exportieren
dersummi am 24.11.2006 um 14:32 Uhr (0)
Also erstmal danke für die Arbeit!Im deutschen funzt es ausgezeichnet mit den Achsensystemen!Nun habe ich versucht es auch im Englischen hin zu bekommen! Laut Suchstring sollte der Typ , wie von dir angegeben, "Axis System" sein! Also habe ich es so versucht wie von dir vermutet! Leider ohne Erfolg! woran kann es noch liegen? hast du eine Idee? Muß es noch hinbekommen das es auch im Englischen funktioniert! Alternativ kann ich das Problem vll auch Methodisch lösen, in dem ich Vorgebe das die Systeme immer ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Bedingungsrichtung umkehren
kernrot am 01.08.2012 um 12:02 Uhr (0)
Hallo,ich möchte via VBA die Richtung einer Abstandsbedingung ändern.Die Richtung der Bedingung Abstand soll, wie im Screeshot zu sehen, gedreht werden.Mit manuellen klicken auf Position ändern für die Bedinung funktioniert es wunderbar.In der Aufzeichung quasi wird alles in der Zeichung angefasst und Werte geändert, also nicht wirklich nützlich.Relevante Funktionen laut Manual sind "Side" und "Orientation", wenn ich das recht verstehe, also folgendes Script erstellt:Code:Sub Test()Dim part As partSet part ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Hide/Show
Tamo am 21.02.2012 um 10:22 Uhr (0)
So habe ich es nun gelöst.Kann man das noch irgendwie verschlanken/optimieren?Set partDocument1 = CATIA.ActiveDocumentSet selection1 = partDocument1.SelectionSet visPropertySet1 = selection1.VisPropertiesSet part1 = partDocument1.PartSet bodies1 = part1.BodiesSet body1 = bodies1.Item("Part01_mounted")Set hybridBodies1 = body1.HybridBodiesSet hybridBody1 = hybridBodies1.Item("Seam_mounted")Set hybridShapes1 = hybridBody1.HybridShapesSet hybridShapeSplit1 = hybridShapes1.Item("Split.151")Set hybridShapes1 = ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Linientyp im Darwing ändern
denyo_1 am 16.07.2008 um 16:50 Uhr (0)
Hallo TheCW,eigentlich sollten dort alle Linien einer aktiven View aufgezählt werden. Kann es sein, das du kein View aktiviert hast sondern ein Blatt?Um alle Linen sauber umzustellen braucht du 2 Schleifen:Schleife 1: Alle Blätter durchlaufenSchleife 2: Alle Views auf den Blättern durchlaufenHier mal ein Auschnitt eines Makro das die GeoElements aus Views löscht. Die Views dürfen dabei nicht auf Detail-Blättern liegen, da diese nicht beachtet werden.Code:Set oDRWDoc = CATIA.ActiveDocumentDim oSel As Select ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : automatisiertes Erstellen von Screenshots anhand Annotated Views
Manu_b am 12.06.2008 um 09:51 Uhr (0)
Hallo Daniel,ich bin begeistert. Nach geringen Modifikationen macht das Makro genau das, was wir benötigen..Kann man nicht auch 100 Unities vergeben Folgende Zeilen habe ich angepasst:- Dim Name As String, produziert bei mir eine Fehlermeldung (Anweisungsende erwartet), diese Zeile habe ich auskommentiert- CATIA.ActiveWindow.ActiveViewer.Reframe auch diese Zeile habe ich auskommentiert, weil er das gesamte Produkt damit weit weg zoomt, und wir dann die anmerkungen etc. nicht mehr lesen können. nun bekommen ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Vom Sruckturbaum Teile Zählen und die Gesamtstückzahl auslesen.
moppesle am 06.07.2016 um 14:23 Uhr (1)
Hallo Bernd,habe das in dem Beitrag so verstanden dasCode:If Paras.Item(Paras.Count).ValueAsString = "false" ThenEindeutiger ist.Zitat:das funktioniert natürlich auch, aber der Zugriff ist dann nicht eindeutig. Wenn in der Parameter-Collection des Products mehrere SubProducts/Parts stecken, dann erfolgt der Zugriff immer auf den ersten Parameter der gefunden wird. Eindeutig wird es erst, wenn man den gesamten Pfad angibt, oder eben aber mit count. So kann ich bei der Rekursion immer das aktuelle Produkt ab ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Ausrichtung Circle2D
MarkS. am 06.12.2012 um 16:35 Uhr (0)
Hallo roccat,leider hält sich Catia nicht immer an die Regeln, wie ich es gestern erst angenommen hatte. Ich habe mal etwas mit der Funktion "GetParamExtents" rumgespielt, welche Bernd vorgeschlagen hatte.Vllt. hilft Dir der Ansatz etwas weiter...Code:Function GetCircleGCode(circle2D1 As Variant, dStartX As Variant, dStartY As Variant) As StringDim coordCenter(1)Dim circle_angle(1)Dim dirVec(1)Dim pktStart(1)Dim pktEnd(1)Dim pktRot(1) circle2D1.GetCenter coordCenter circle2D1.GetParamExtents circle_angle ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Probleme mit UserSel
Michau am 12.04.2011 um 11:19 Uhr (0)
hier der Code: vielleicht kann mir da einer helfenDim activedoc As INFITF.DocumentDim AllProduct As ProductDim AllProducts As ProductsDim i As LongDim Selection1 As ObjectDim Status As StringDim SpPart As MECMOD.PARTSet activedoc = CATIA.ActiveDocumentSet AllProduct = activedoc.ProductSet AllProducts = AllProduct.Products Dim RefPos1 As Reference Dim RefPos2 As Reference Dim SpannRef1 As Reference Dim SpannRef2 As Reference Set Selection1 = activedoc.Selection Dim InputObjectType(0) InputObjec ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Ausgabe Überschneidungsergebnis als Datei
Petermaen am 07.06.2010 um 12:13 Uhr (0)
Hallo,etwas spät aber gibt es hier noch was neues zu diesem Thema??Ich versuche gerade clash value, FirstProduct, SecondProductund die Coordinaten in ein Text File heraus zu schreiben.Bei dem value hat es mit einer MsgBox geklappt, aber beim FirstProduct und SecondProduct klappt es nicht.Script:Sub CATMain()Set oProductDocument = CATIA.ActiveDocumentSet oProduct = oProductDocument.Product Set Clashes1 = oProduct.GetTechnologicalObject("Clashes")Set Groups1 = oProduct.GetTechnologicalObject("Groups")S ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Boundary-Referenz
joehz am 28.01.2017 um 22:05 Uhr (1)
Hi Fox,zeichne den Vorgang mit dem Makro-Rekorder auf und schau Dir dann die breps an.Code:Dim reference1 As ReferenceSet reference1 = part1.CreateReferenceFromBRepName("FVertex:(Vertex:(Neighbours:(Face:(Brp:(Pad.1;2);None:();Cf11:());Face:(Brp:(Pad.1;0:(Brp:(Sketch.1;1)));None:();Cf11:());Fa ce:(Brp:(Pad.1;0:(Brp:(Sketch.1;4)));None:();Cf11:()));Cf11:());WithPermanentBody;WithoutBuildError;WithSelectingFeatureSupport;MFBRepVe ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Koordinatenpunkte verschieben
cevk am 25.01.2008 um 15:23 Uhr (0)
Hallo Taylor Herzlich willkommen im Forum Habe leider keine Vollständige Lösung für Dich aber ich fang mal an vieleicht können die Anderen noch etwas beitragen.Code:_____________________________________________________________________________Sub Punkteverschieben()Dim partDocument1 As PartDocumentSet partDocument1 = CATIA.ActiveDocumentDim part1 As PartSet part1 = partDocument1.PartDim selection1 As SelectionSet selection1 = partDocument1.SelectionDim hybridShapeFactory1 As HybridShapeFactorySet hybridSh ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Punkt auf welcher Fläche? / Ebene parallel zur Fläche durch Punkt
Effak am 04.09.2009 um 15:29 Uhr (0)
Hi,Ich habe folgende Situation: Es gibt einen runden Körper, auf dem mehrere Punkte vorgegeben sind (siehe Bild). Die Punkte wurden bereits ausgewählt und stehen z.B. als CATIA.ActiveDocument.Selection zur Verfügung.Jetzt möchte ich durch jeden Punkt eine Ebene erstellen, die parallel zur Körperobefläche ist. Das Problem daran ist, dass die Oberfläche nicht bei allen Punkten die selbe ist, wie man im Vergleich des 2. und 3. Punktes sieht.Das heißt, dass ich entweder eine Möglichkeit brauche die Ebene herau ...
|
| In das Form CATIA V5 Programmierung wechseln |
