|
CATIA V5 Programmierung : Product2Part Reloaded V5R18 SP2
Kai Knospe am 28.10.2008 um 10:51 Uhr (1)
Moin moin,die R18 hat ja doch einiges zu bieten...etwa ist endlich die ASD Funktion Product to Part implementiert:Code:Dim oProductDocument As ProductDocumentDim oProduct As ProductDim oProd2Part As DECProductToPartSet oProductDocument = CATIA.ActiveDocumentSet oProduct = oProductDocument.ProductSet oProd2Part = oProduct.GetItem("DECProductToPart")oProd2Part.RunsError = oProd2Part.GetErrorSet oAllCATPart = oProd2Part.GetResultDas Objekt taucht zwar im Objekt Browser auf, nur in der Hilfe nicht...und natürl ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Product2Part Reloaded V5R18 SP2
Kai Knospe am 30.10.2008 um 23:36 Uhr (1)
Hallo,das ist im Prinzip ganz Einfach ;-)Es gibt im Objektkatalog eine ganze Reihe von Funktion, für die kein "Pfad" angegeben ist. Diese sind auch in der Online Doku nicht drin.So ist mir auch vor einiger Zeit das GetItem("ModelElement") aufgefallen, mit dem man den Catia-Internen Namen eines Sketches, Bodies etc. abfragen kann.Es gibt noch eine ganze Reihe weiterer Funktionen. Such doch mal die Dictionaries (*.dic) nach dem Text "VBExtension" durch, da wirst Du satt belohnt...Wenn ich das die Tage bei mi ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Linie auf Blatthintergrund erstellen
Kai Knospe am 14.11.2008 um 22:24 Uhr (0)
Moin,wenn ich das so recht überblicke suchst Du in etwa sowas:Code:Sub CATMain() Set oDrawingDocument = CATIA.Documents.Add("Drawing") Set oSheet = oDrawingDocument.Sheets.Item(1) For iCount = 1 To oSheet.Views.Count If oSheet.Views.Item(iCount).ViewType = catViewBackground Then iMainView = iCount End If Next Set oView = oSheet.Views.Item(iMainView) oView.Activate Set oFactory2D = oView.Factory2D Set oCircle = oFactory2D.CreateClosedCircle(50, 50, 50)End SubDabei gehen die meisten Zeilen drauf, die Mai ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Macros
Kai Knospe am 14.11.2008 um 22:03 Uhr (0)
Moin,soweit ich das recht verstehe ist folgendes als "Lösung" tragbar...dank der Tatsache dass V5 als Projektionsebene (ähnlich wie beim sketcher) keine wirkliche Ebene verwaltet (oder uns vbslern zur Verfügung stellt) ;-)Code:Sub CATMain() Set oDocument3D = CATIA.ActiveDocument Set oProduct3D = oDocument3D.Product Set oDrawingDocument = CATIA.Documents.Add("Drawing") Set oSheet = oDrawingDocument.Sheets.Item(1) oSheet.PaperSize = catPaperA0 Set oView = oSheet.Views.Add("GeneratedView") Set oGenerativeBeha ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : FTA-Ansichten (TPSViews)
Kai Knospe am 17.11.2008 um 07:01 Uhr (0)
Hallo Christian,sorry für die späte Antwort...Erzeugst Du die View per Makro???Interaktiv bemühe ich mich immer die View auf ein Achsensystem zu legen (wird von Catia anstatt einer Ebene akzeptiert) und die View wird an xy ausgerichtet...das schafft Sicherheit ;-)Per Makro schalte ich das Achsensystem entsprechend meinem Ausrichtungswunsch scharf und nehm dann die xy Ebene...Gruss,Kai
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Linie an vom Benutzer freiwählbaren Punkt
Kai Knospe am 17.11.2008 um 13:18 Uhr (0)
Moin,langsam frage ich mich: Möchtest Du etwas programmieren, oder etwas programmiert haben???Gruss,KaiCode:Sub CATMain()dHeight = 20dWidth = 40Set oDrawingDocument = CATIA.Documents.Add("Drawing")Set oSel = oDrawingDocument.SelectionSet oSheet = oDrawingDocument.Sheets.Item(1)For iCount = 1 To oSheet.Views.CountIf oSheet.Views.Item(iCount).ViewType = catViewBackground TheniMainView = iCountEnd IfNextSet oView = oSheet.Views.Item(iMainView)oView.ActivateDim dArrayDrawingWindowLocation(1)sStatus = oDrawingD ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Umbennung von mehreren Elemnten
Kai Knospe am 26.11.2008 um 12:17 Uhr (0)
Moin,ja, da muss ich Dir beipflichten...das ist nicht so wild ;-)))Elemente im Baum selektieren und dann das Makro starten...Code:Set oSelection = CATIA.ActiveDocument.SelectionFor iCount = 1 To oSelection.CountSet oItem = oSelection.Item(iCount).ValueoItem.Name = "Plane_" & iCountNextGruss,Kai
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Teilenummer an DrawingText
Kai Knospe am 28.11.2008 um 07:52 Uhr (0)
Moin,Du musst ja nur die Partnumber zerlegen, alles andere hast Du ja bereits...Code:Set oProduct = CATIA.ActiveDocument.ProductsPartNumber = oProduct.PartNumbersPrefix = Left(sPartNumber,6)sSuffix = Mid(sPartNumber,8,Len(sPartNumber))oMyText1.Text = sSuffixoMyText2.Text = sPrefix Gruss,Kai
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : GSM Feature Internal Name Workaround
Kai Knospe am 07.02.2009 um 06:15 Uhr (0)
Moin,da das ModelElement ja auch nicht alle Features beinhaltet, die meisten hier aber Zugriff auf den Knowledge Advisor haben, lässt sich der interne Name eines GSM Elements auch über einen Workaround herausfinden ;-)Durch Erzeugen einer Rule gibt uns Catia Einblick in die internen Namen:Code:`Geometrical Set.1Point.1` -Id()`Geometrical Set.1Point.1` -AbsoluteId()Ich hab das mal exemplarisch (siehe Bild) mit einem String-Parameter verknüpft, den man ja (in der Not) temporär erzeugen kann......nicht ganz s ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catia Games - MineSweeper
Kai Knospe am 24.12.2009 um 09:31 Uhr (0)
Moin,nachdem ich nun die Performance unter Unix live erleben durfte, hab ich das Konzept des Feldaufbaus fix geändert und dadurch Steigerungen beim Feldaufbau vom Faktor 2-6 (je nach Hardware) erzielt, womit nun auch den Originalfeldgrößen nichts mehr im Weg steht.Die Beseitigung des "Spaghetti-Code" folgt demnächst, sofern mir meine Frau im Urlaub nicht das Notebook entwendet ;-)Gruß,Kai
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catia Games - MineSweeper
Kai Knospe am 05.01.2010 um 18:19 Uhr (0)
Vielen Dank für die Blumen ;-)Das habe ich in verschiedenen Umgebungen mit R18 auch schon beobachtet, dass das Einfärben des Bodies / GeoSets nicht wirkt.Direkte Hilfe / Lösung ist folgende (dann wird auch wieder das ganze Steinchen eingefärbt):- PartBody selektieren- RMT "PartBody Object" - Reset PropertiesIn Folge werden auch die neu hinzugefügten Bodies korrekt eingefärbt...Catia eben ;-)Als Workaround färbe ich jetzt das Feature ein, dann sieht es auch aus wie in der Ursprungsversion.Die neue Version d ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catia Games - MineSweeper
Kai Knospe am 14.02.2010 um 20:50 Uhr (0)
Aloha,es tut sich was...und hoffentlich wird jetzt alles gut mit der aktuellen Version ;-)Gruß,KaiPS: Es ist nach wie vor eine "tech-demo"...was geht wenn man nix hat ausser v5 und doch Spaß haben möchte ;-)
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catia Games - MineSweeper
Kai Knospe am 22.12.2009 um 21:38 Uhr (0)
Moin moin,es weihnachtet mal wieder ganz stark, Zeit also meinen Beitrag dazu zu leisten ;-)Anbei findet Ihr einen zweiten Wurf des Spiels MineSweeper für V5.Kurz zur Bedienung:- Makro ausführen und die Dimensionen des Feldes wählen- Spielebene ist die YZ Ebene- verbliebene Mienen werden in der Statuszeile angezeigt- Rechtsklick (Miene "raten") - Fase (rechts) anklicken - Steinchen wird rot eingefärbt- Linksklick (Feld aufdecken) - Face (parallel zur YZ Ebene // links) anklicken - Feld wird aufgedeckt (Zah ...
|
| In das Form CATIA V5 Programmierung wechseln |
