|
CATIA V5 Programmierung : Zeichnungsableitung unabhängig vom Partnamen
lohri am 09.07.2007 um 11:31 Uhr (0)
Vielen Dank, jetzt wird einiges klarer. Ich gestehe, den Code über den Makrorecorder erstellt zu haben. Dann habe ich ihn etwas modifiziert, ohne ihn aber komplett zu verstehen. Unverständlicherweise (ich habe bei der Aufnahme nur ein Part abgeleitet) setzt er die FrontView einem Product gleich und hangelt sich dann wieder über item und getitem zum Part runter. Das ist natürlich unsauber und war sicher auch der Fehler.Dank deines sauberen Codes wird mir auch klar, was für das Makro auch wirklich gebraucht ...
|
|
CATIA V5 Programmierung : Zeichnungsableitung unabhängig vom Partnamen
lohri am 06.07.2007 um 09:52 Uhr (0)
Hallo Zusammen,ich möchte eine Zeichnung ableiten, unabhängig davon wie das Part heißt. Dazu frage ich den Partnamen des aktuellen Dokuments ab und will ihn als String für die Variable Prod wiedereinfügen.Hier mal mein Testprogramm:Sub CatMain()Part markierenDim P As PartSet P = CATIA.ActiveDocument.PartMsgBox (P.Name)Dim PName As StringPName = P.Name & ".CATPart"MsgBox (PName)Zeichnung erstellenDim D As DocumentSet D = CATIA.Documents.Add("Drawing")D.Standard = catISODim DS As DrawingSheetSet DS = D.Sheet ...
|
|
CATIA V5 Programmierung : GetCoordinates
lohri am 17.07.2007 um 11:29 Uhr (1)
Hallo,kann bitte jemand sagen, wie ich die Punkt-Koordinaten aus einem Skizzierer auslesen kann? Im der Automation.chm fand ich nur Befehle zum Ansteuern von 3D-Punkten bzw. unter Object Sketch sind nur Methoden zum Punkt erzeugen zu finden.Hier mal mein Testprogramm, um zumindest mal die Skizze anzusprechen:Sub CATMain()Dim D As DocumentSet D = CATIA.ActiveDocumentDim P As PartSet P = D.PartDim Skizzen As SketchesSet Skizzen = P.Bodies.Item("Hauptkörper").SketchesMsgBox (Skizzen.Item(1).Name)End Sub
|
|
CATIA V5 Programmierung : GetCoordinates
lohri am 18.07.2007 um 09:45 Uhr (1)
Hallo,manchmal sollte man echt nochmal ne Nacht drüber schlafen.Ich habs jetzt:Sub CatMain()Dim coord(1)Dim coordBox()Dim GeoElem As GeometricElementsSet GeoElem = CATIA.ActiveDocument.Part.Bodies.Item("Hauptkörper").Shapes.Item(1).Sketch.GeometricElementsDim sMsgBox As StringReDim coordBox(1, GeoElem.Count)For i = 1 To GeoElem.Count If GeoElem.Item(i).GeometricType = (2) Then GeoElem.Item(i).GetCoordinates (coord) coordBox(0, i) = coord(0) coordBox(1, i) = coord(1) sMsgBox = sMsgBox & Chr(10) ...
|
|
CATIA V5 Programmierung : getcomponents ohne Selection
lohri am 28.08.2007 um 16:44 Uhr (0)
Hallo Zusammen,ich möchte einen Koordinatentransformation in einem Produkt ausführen. Wie ich die Punkte im Part auslese und wie man eine Transformation durchführt habe ich dank eurer Hilfe bereits herausgefunden. Mir fehlt jetzt lediglich die translatorische und rotatorische Position des Parts im Produkt. Das geht offenbar mit der Methode getcomponents. Ich weiß, dass das Thema mittlerweile ein alter Hut ist, dennoch möchte ich die Methode gerne direkt auf das gerade aktive PartDocument anwenden - ohne di ...
|
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
