|
CATIA V5 Programmierung : Repeat Points on Curve
imation1999 am 18.04.2013 um 11:11 Uhr (0)
so z.B:Code:Language="VBSCRIPT"Sub CATMain()Dim partDocument1 As DocumentSet partDocument1 = CATIA.ActiveDocumentDim part1 As PartSet part1 = partDocument1.PartDim hybridBodies1 As HybridBodiesSet hybridBodies1 = part1.HybridBodiesDim hybridBody1 As HybridBodySet hybridBody1 = hybridBodies1.Item("Geometrical Set.1")Dim hybridShapes1 As HybridShapesSet hybridShapes1 = hybridBody1.HybridShapesDim hybridShapeLinePtDir1 As HybridShapeSet hybridShapeLinePtDir1 = hybridShapes1.Item("Line.1")Dim reference1 As Ref ...
| | In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro programmieren um definierte Löcher zu finden
imation1999 am 18.04.2013 um 12:55 Uhr (0)
Hier muß man also zu einem Trick greifen.Zuerst speichert man die einzelnen Elemente der Selection in ein Array:Code:Dim SelElemente() As ObjectReDim SelElemente(Selection1.Count) For i = 1 To Selection1.Count Set SelElemente(i) = Selection1.Item(i)Next iDann löscht man die Selection und weist der Selection einzeln die gespeicherten Objecte zu:Code:For i = 1 To UBound(SelElemente) Selection1.Clear Selection1.Add SelElemente(i).Value ... .. .Next iSo kommst Du in Bohrung rein:Code:Sub CATMain()Dim partDocum ...
| | In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Objekt finden, vergleichen und in Tabelle darstellen.
imation1999 am 02.05.2013 um 15:07 Uhr (0)
Zitat:Original erstellt von bgrittmann:Servuskleiner Hinweis zum Makro:ich befürchte (gemäß meinem Test)dass bei diesem Makro die Zählungen von Bohrungen die gemustert wurden, die falsche Anzahl ermittelt wird.GrußBerndHallo Bernd,du hast natürlich Recht.Hast du vielleicht einen Vorschlag, wie man korrigieren kann?EDIT (VBAProject mit Sortierung von Durchmesser):Code:Sub CATMain()Dim length1 As LengthDim hole1Dim dDim ItDim KeConst CNew = 1 Counter New = 1Dim CAct Counter ActualDim Arr()Dim dTemp ...
| | In das Form CATIA V5 Programmierung wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
