|
CATIA V5 Programmierung : Dokumentumgebung aktuell setzen
meisterlumpi am 17.08.2011 um 18:27 Uhr (0)
Hallo,das sieht schlecht aus. das thema wurde auch schon behandelt siehe: http://ww3.cad.de/foren/ubb/Forum137/HTML/000784.shtml#000005 an die DL names kommste mitCode:Sub CATMain() Dim settingControllers1 As SettingControllers Set settingControllers1 = CATIA.SettingControllers Dim dLNameSettingAtt1 As DLNameSettingAtt Set dLNameSettingAtt1 = settingControllers1.Item("CATSysDLNameSettingCtrl") Dim varArr() varArr = dLNameSettingAtt1.GetDLNameList For i = LBound(varArr) To UBound(varArr) Msg ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : User-Selektion umbennen
meisterlumpi am 17.08.2011 um 17:10 Uhr (0)
Die codezeile, die bei dir den fehler auslöst wird eigentlich nur dann aufgerufen wenn auch eine komponente in der baugruppe vorhanden ist. anscheinend wird sie bei dir immer aufgerufen was vermuten lässt, dass der fehler in zeile 62 liegt:Code:If M_DocStructure.IsComp(ParentProduct) Then IsComp überprüft ob das Product eine Komponente ist oder ein normales Produkt. dabei wird entweder wahr oder falsch zurückgegeben von der function. Ich gehe davon aus, dass die bei dir immer wahr zurückgibt.. das ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Multivalueparameter ändern
meisterlumpi am 06.09.2011 um 13:02 Uhr (1)
Hallo nochmal,du kannst keine List- oder Combobox erstellen ohne Userform, sprich das geht nur mit VBA. Oder soll die Listbox in Excel erstellt werden? Dann würde ich den code direkt in ein excel makro packen.grußCode:Dim I, AnzahlZeilen, selEintrag, x As Integerdeklariert lediglich x als Integer. I, AnzahlZeilen und selEintrag werden (nicht gerade speicherschonend) als Variant deklariert.besser wäreCode:Dim I As Integer, AnzahlZeilen As Integer, selEintrag As Integer, x As Integer------------------ NJ | ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : UserPattern kopieren
meisterlumpi am 23.07.2011 um 07:35 Uhr (0)
Hallo Azatzum Messen könntest du die SPAWorkbench verwenden.Code:Dim reference1 As Reference Set reference1 = part1.CreateReferenceFromObject(Punkt1)Dim reference2 As Reference Set reference2 = part1.CreateReferenceFromObject(Punkt2)Dim TheSPAWorkbench As Workbench Set TheSPAWorkbench = CATIA.ActiveDocument.GetWorkbench("SPAWorkbench")Dim TheMeasurable As Measurable Set TheMeasurable = TheSPAWorkbench.Measurable(reference1) Dim minDistance As Double minDistance = TheMeasurable.GetMinimumDistance(refere ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Dokumentenstruktur erfassen
meisterlumpi am 26.05.2011 um 20:01 Uhr (0)
Hallowie andere wahrscheinlich auch stoße ich öfters mal auf das Problem, dass ich bestimmte Parts oder Products in einem Dokument ansprechen will. Dazu braucht man manchmal den Dateinamen, die PartNumber, den Namen oder den "Pfad" zum Objekt innerhalb der Dokumentenstruktur. Um mir das lästige Suchen zu ersparen dachte ich, schreib ich eine Funktion die die Dokumentenstruktur vorweg analysiert und mir dann alle nötigen Infos in einer Collection ausgibt. Wenns gut funktioniert würde ich die Funktion gerne ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : per Makro Eigenschaften im Drawing ändern
meisterlumpi am 06.08.2011 um 07:21 Uhr (0)
Hallodefiniert man seine Ansicht mitCode:Dim drawingDocument1 As DrawingDocumentSet drawingDocument1 = CATIA.ActiveDocumentDim drawingSheets1 As DrawingSheetsSet drawingSheets1 = drawingDocument1.SheetsDim drawingSheet1 As DrawingSheetSet drawingSheet1 = drawingSheets1.Item("Blatt .1")Dim drawingViews1 As DrawingViewsSet drawingViews1 = drawingSheet1.ViewsDim drawingView1 As DrawingViewSet drawingView1 = drawingViews1.Item("Vorderansicht")kann man diese sperren mitCode:drawingView1.LockStatus = Truewieder ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Objekt in bearbeitung setzen
meisterlumpi am 10.08.2011 um 17:23 Uhr (1)
Zitat:Denn auch mit selektieren/workbench wechsel/Rootdokument aktivieren und Rootprodukt aktivieren ist es nicht möglich aus einem aktivierten Unterpart das Hauptprodukt zu updaten.das funktioniert aber bei mir einwandfrei mit dem skript, was du da hast.hab ein produkt mit unterprodukten und parts darin, dann erstell ich im rootprodukt eine baugruppenbeziehung zwischen 2 parts. dann doppelklick auf ein part, sprich partdesign. dann lasse ich das makro laufen und das rootprodukt wird aktualisiert, sprich ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Skizze einer Tasche tauschen (Sheetmetal)
meisterlumpi am 09.08.2011 um 10:10 Uhr (0)
Hallo Zitat:Der Nachteil wenn man mit Visual Studio arbeitet ist der, das die Codecompletion nur sehr stark eingeschränkt funktioniert und das man alles allgemein definieren muss.kann es sein, dass du im VS die entsprechenden Namespaces nicht importiert hast? Ansonsten kann ich diese Aussage nicht nachvollziehenimportiert werden:Code:Imports INFITFImports MECMOD...Hab mir grad ein simples Dokument mit einem Stück Blech gemacht, dann zwei skizzen darauf erstellt (Skizze.1, Skizze.2) und eine Tasche auf Skiz ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Per Makro CATPart.name ändern
meisterlumpi am 09.08.2011 um 15:20 Uhr (0)
Hallofolgendes grad mit dem Makrorecorder aufgezeichnetCode:Sub CATMain()Dim documents1 As DocumentsSet documents1 = CATIA.DocumentsDim productDocument1 As ProductDocumentSet productDocument1 = documents1.Item("Produkt2.CATProduct")Dim product1 As ProductSet product1 = productDocument1.ProductDim products1 As ProductsSet products1 = product1.ProductsDim product2 As ProductSet product2 = products1.Item("Teil4.1")product2.Name = "neu_Teil4.1"End Subwill man die Teilenummer ändern wäre das folgender codeCode: ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : per Makro Eigenschaften im Drawing ändern
meisterlumpi am 09.08.2011 um 15:35 Uhr (0)
Mein Catia macht genau dasselbe. Denke mal das ist ein Bug.
|
| In das Form CATIA V5 Programmierung wechseln |
M_Doc_Structure.txt |
CATIA V5 Programmierung : Per Makro CATPart.name ändern
meisterlumpi am 09.08.2011 um 16:32 Uhr (0)
Wie sieht den die Funktion aus, welche dir die Produktstruktur ermittelt?Sowas hab ich auch mal geschrieben und im folgenden beispiel benutzt.Nach dem man die CATMain hier gestartet hat kann man ein Product oder Part auswählen und bekommt dann ein inputfenster wo man den neuen Namen eingeben kann.Im Anhang befinden sich noch ein Modul "M_Doc_Structure" und eine Klasse "C_Doc_Structure_Object" die du in deinem VBA Projekt brauchst. (M_Doc_Structure wird in Zeile 1 aufgerufen)Im Prinzip das selbe, was ich in ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Problem Farbe der Bohrung ändern
meisterlumpi am 26.08.2011 um 01:43 Uhr (0)
Halloalles an code hier im post ist ungetestet!mit Selection.Search "CATPrtSearch.Hole.Threaded=TRUE,....." ist es natürlich am elegantesten, aber keine ahnung wie das geht..ansonsten..Code:Dim ActiveDoc As Document Set ActiveDoc = CATIA.ActiveDocumentDim Selection1 As Selection Set Selection1 = ActiveDoc.SelectionDim SelectedHoles As Collection Set SelectedHoles = New CollectionSelection1.ClearSelection1.Search "CATPrtSearch.Hole.Threaded=TRUE,all"Dim SelHole As HoleDim i As IntegerFor i = 1 To Selection1 ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Konvertieren in VBA
meisterlumpi am 30.08.2011 um 08:59 Uhr (0)
HalloKopier den code doch mal in ein VBA Projekt, der sollte eigentlich so laufen.Mit den Leerzeichen vor und nach & muss man glaub ich ein bisshen aufpassen. cDateiPfad&cDateiName - cDateiPfad & cDateiNamegruß------------------ NJ | Inoffizielle CATIA Hilfeseite | ???
|
| In das Form CATIA V5 Programmierung wechseln |
