|
CATIA V5 Programmierung : Nur Elemente direkt unter eines GeoSets auswählen
AndiKrue am 20.02.2009 um 11:51 Uhr (0)
Hallo ich mache es jetzt folgendermaßen:Code:Sub CATMain()Auswahl = selection1.selectelement2(Filter2, "Zu kopierendes Geoset Auswählen", true) Auswahl des UsersSet hybridbodyEM(Ebene&ItemPos(Ebene)) = selection1.item(1).valueSet hybridBodiesEM(Ebene&ItemPos(Ebene)) = hybridbodyEM(Ebene&ItemPos(Ebene)).hybridbodiesSet hybridShapesEM(Ebene&ItemPos(Ebene)) = hybridbodyEM(Ebene&ItemPos(Ebene)).hybridshapesSet hybridSketchesEM(Ebene&ItemPos(Ebene)) = hybridbodyEM(Ebene&ItemPos(Ebene)).hybridsketchesSet BodiesE ...
|
|
CATIA V5 Programmierung : HybridShapeSplit - BothSidesMode 2tes Element auswählen
Christrukteur am 16.07.2010 um 11:25 Uhr (0)
Hallo zusammen,habe bei der Erstellung einer Trennung für ein Profil, wo ich im nachhinein beide Seiten behalten möchte, das Problem, dass ich die 2te Seite nicht mehr ausgewählt bekomme. Konkret:Dim hybridShapeSplit1 As HybridShapeSplitSet hybridShapeSplit1 = hybridShapeFactory1.AddNewHybridSplit(reference20, reference21, 1)hybridShapeFactory1.GSMVisibility reference20, 1hybridShapeSplit1.BothSidesMode Truebody1.InsertHybridShape hybridShapeSplit1part1.InWorkObject = hybridShapeSplit1part1.UpdateEs entste ...
|
|
CATIA V5 Programmierung : Kreismuster: Winkel parametrisieren (Pfadunabhängig)
Lusilnie am 11.08.2010 um 00:35 Uhr (0)
Hallo weylin,Du kannst nicht direkt die Parameter des "PatternSpacing" auslesen und sie mit einer Formal verknüpfen.Hier musst du über die Parameter-"SubList" des Patterns gehen, das "PatternSpacing" mit der richtigen "InstanceNumber" finden und das zugehörige "InstanceSpacing" mit der neu zu erstellenden Formel verknüpfen.In etwa so (ungetestet!):Code: Dim i As Integer Dim param As Parameter Dim itemName As String i = 2 Do intCircPattObj.SetInstanceAngularSpacing i, Me.Controls("meinetextbox" & ...
|
|
CATIA V5 Programmierung : Kreismuster: Winkel parametrisieren (Pfadunabhängig)
weylin am 12.08.2010 um 14:47 Uhr (0)
Vielen Dank für deine Hilfe Lusilnie. leider tritt ein Fehler auf, bei dem ich nicht weis wie ich ihn beheben kann. Code: ***DEKLARATIONEN Dim intPartDocObj As PartDocument Dim intPartObj As Part Dim intShapeFacObj As ShapeFactory Dim intRef1Obj As Reference Dim intRef2Obj As Reference Dim intCircPattObj As circpattern Dim intBodyObj As Body Dim intHybBodiesObj As HybridBodies Dim intHybBody As HybridBody Dim intHypShapesObj As HybridShapes Dim intAxisObj As HybridShapeAxisLine Dim intRef3Obj A ...
|
|
CATIA V5 Programmierung : Textfelder auf einem Sheet suchen
sucher2010 am 26.10.2010 um 13:34 Uhr (0)
Hallo Christian. Ich habe die Befehle mal ausprobiert aber ich weiss nicht ich kann die Textfelder immernoch nicht bearbeiten? oView.Texts.GetItem("Text.111").Text = "hier kommt der inhalt" könnte ich nicht ganz einbauen, weil es immerwieder fehlermeldungen zeigt.Ich danke dir schon im Voraus.MFGBMLanguage="VBSCRIPT"Sub CATMain()---- Begin resolution script for object : Text.120Dim drawingDocument1 As DrawingDocumentSet drawingDocument1 = CATIA.ActiveDocumentDim drawingSheets1 As DrawingSheetsSet drawingSh ...
|
|
CATIA V5 Programmierung : NoShow oder Show global gesehen
gladly am 29.09.2010 um 15:30 Uhr (0)
Auch wenn dieser Beitrag schon etwas in die Jahre gekommen ist hätte ich noch eine Lösung die meiner meinung nach weniger aufwendig ist.1. Selektiert das Object2. Das Übergeortnete Elemtent markieren3. Eine Suche Visibility=Shown in Current Selection (Der Übergeortnete HybridBody) - Shown zeigt wirklich nur Sichtbare Elemente. Visible hingegen ob sie selbst "an" oder "aus" sind.4. Schauen ob in Selektion dein Element ist! Leider geht die Suche nicht wenn man direkt das Element anwählt. Deshalb der umweg üb ...
|
|
CATIA V5 Programmierung : Dimension erzeugen
cChris am 04.10.2010 um 13:54 Uhr (0)
Hallo zusammen,ich formuliere die Frage etwas anderst.1. Front view erzeugen (erledigt)2. Dimensions erzeugen (hierzu benötige ich eure Hilfe)Ich habe als erstes eine Front View mit folgendem Code erzeugt.Sub CATMain() Const sFrontView = "FrontView" Const sLeftView = "LeftView" Const sTopView = "TopView" Set oProductDocument = CATIA.ActiveDocument Set oPart = oProductDocument.Part Set oSelection = oProductDocument.Selection Set oOriginElements = oPart.OriginElements Set oPlaneXY ...
|
|
CATIA V5 Programmierung : Automatische Erstellung von Thick Surface mit Parameterzuordnung
roccat am 06.10.2010 um 22:09 Uhr (0)
Hallo Dede,mal ein Beispiel für dein Problem, ist aber ein vbaproject.Parameter müssen aber External Parameter sein, sollte das nicht immer so sein mußt du noch mal ne Unterscheidung machen. Sollten sich die Nummern der Flächen ändern würde ich die Range vom Benutzer eingeben lassen. Mit der Search funktion geht´s natürlich auch ist einfacher (brauchst dann keine Rekursion) aber auch bissl langsamer...Option ExplicitSub CATMain()Dim MyDocument As DocumentDim MyPart As PartDim MyHybBody As HybridBodyDim ...
|
|
CATIA V5 Programmierung : Late Binding mit Visual Basic 2008 Express Edition
gladly am 11.10.2010 um 15:54 Uhr (0)
Hallo nochmal,vorab schuldige, dass ich mich erst nun melde...So nun zum Problem:Ich musste es natürlichgleich Probieren mit deinem "InWorkObject" und ja es funktioniert (zumindest) unter .net 2005 als implizite Late-Binding tatsächlich nicht.Ich habe es somit per Hand gemacht und es funktioniert.Code sähe so aus:Code:Dim catia As Object = System.Runtime.InteropServices.Marshal.GetActiveObject("CATIA.Application")Dim oPart As ObjectoPart = CATIA.ActiveDocument.PartDim oBody As Object = oPart.HybridBodies.i ...
|
|
CATIA V5 Programmierung : Geometrisches Set in Hide-Modus stellen
bgrittmann am 03.12.2010 um 16:04 Uhr (0)
ServusAm einfachsten bekommt man den "Suchstring" indem man sich ein Makro davon aufzeichnet.Für GeoSet (ungetestet) zB:Code:Set Geoset = part.HybridBodies.item("geoSet")Selection1.add GeoSetSet visPropertySet1 = Selection1.VisPropertiesvisPropertySet1.SetShow catVisPropertyNoShowAttrSelection1.ClearGrußBernd------------------Warum einfach, wenn es auch kompliziert geht.
|
|
CATIA V5 Programmierung : Join aus ausgewählten Objekten erzeugen
davischr am 04.01.2011 um 09:06 Uhr (0)
Hallo zusammen,Ich möchte ein Makro machen, dass mir durch zwei Benutzer Selektionen einen Join an einem bestimmten Ort erzeugt.Der Code den ich bis jetzt geschrieben habe funktioniert soweit, dass es keine Fehlermeldung ausgibt. Jedoch wird kein Join erzeugt. Kann mir da jemand helfen?Code:Language="VBSCRIPT"Sub CATMain()Dim partDocument1 As DocumentSet partDocument1 = CATIA.ActiveDocumentDim selection1 As SelectionSet selection1 = partDocument1.SelectionDim selection2 As SelectionSet selection2 = partDoc ...
|
|
CATIA V5 Programmierung : Join aus ausgewählten Objekten erzeugen
davischr am 04.01.2011 um 10:35 Uhr (0)
Ich habe nach längerem Versuchen bemerkt, dass der Join in den zweiten selektierten Join erzeugt wird. Nun habe ich den letzten Teil des Programms geändert, so dass nun ein GeoSet ausgewählt und der Join in diesem erstellt wird:Code:...sObject3.SelectElement2 strFilter, "Bitte selektiere GeoSet für Join",FalseDim hybridBody1 as HybridBodySet hybridBody1 = sObject3.item(1).valuehybridBody1.AppendHybridShape hybridShapeAssemble1...Mein Problem ist nun, dass der Join leer ist, ich vermute einmal, dass das mit ...
|
|
CATIA V5 Programmierung : Join aus ausgewählten Objekten erzeugen
davischr am 04.01.2011 um 14:37 Uhr (0)
Hallo zusammen,Ich habe es jetzt selber geschafft einen Join zu erzeugen. Grundlegen für mein Problem war die Zeile:Code:...Set ref1 = part1.CreateReferenceFromObject(sObject1.Item(1).Value)...Und da vorallem das Argument der Funktion also sObject1.Item(1).ValueHier noch der vollständige Code:Code:################################### Script um zwei Elemente/Objekte in einen Join zusammenzufassen. Dieser Join wird an einer auszuwählenden Stelle angelegt.###################################Language="VBSCRIPT"S ...
|
