 |
CATIA V5 Programmierung : Skizzenebene für Zeichnung ermitteln
Sm1leX am 17.06.2020 um 08:55 Uhr (15)
Ihr seid Helden ! Danke! Musste die Skizze als Object deklarieren, damit es VBA schluckt. Im Array musste ich noch die Indexe um Eins heruntersetzen. Anbei mal der (halb-)fertige (bzw. rohe), funktionierende Code um automatisch eine Drawing aus einem Geometrischen Set mit beinhaltender Skizze zu erzeugen. Code:Dim documents1 As DocumentsSet documents1 = CATIA.DocumentsDim drawingDocument1 As DrawingDocumentSet drawingDocument1 = documents1.Add("Drawing")drawingDocument1.Standard = catISODim drawingSheets1 ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Part in einem Product anwählen
zoltan.bekesi am 03.11.2008 um 19:57 Uhr (0)
Hallo Knowledge,folgendes sollte dir weiterbringen (ohne es getestet zu haben):Code:Dim productDocument1 As DocumentSet productDocument1 = CATIA.ActiveDocumentDim product1 As ProductSet product1 = productDocument1.ProductDim products1 As ProductsSet products1 = product1.ProductsDim MengeCatparts As IntegerMengeCatparts = products1.CountDim product2 As ProductDim oDocument1 As Documentdim oPart as PartDim ii As IntegerFor ii = 1 To MengeCatparts Set product2 = products1.Item(ii) -- wie komme ich an den Spe ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Visual Studio 2005 - VB.net Was mach ich falsch?
JuergenHeckmann am 01.11.2007 um 01:24 Uhr (0)
Hallo!Hier ist jetzt mal die komplette spline sub von mir...die variable foil ist einfach ein struct in dem nen array mit coordinaten drin ist und die Anzahl der Koordinaten gespeichert ist.Deklariert hab ich doch den spline durch forgende zeile, oder? Spline = PtDoc.Part.HybridShapeFactory.AddNewSplineCode: Sub CreationSpline(ByVal foil As foil, ByVal Spline As Object) Dim index As Integer Dim intCount As Integer Dim PassingPtArray(foil.intCoordinatenumber - 1) As Object Dim ReferenceOnP ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Kollisions-Analyse
karls0n am 17.03.2020 um 11:10 Uhr (1)
Hallo,ich suche die maximal vorhandene Durchdringung in z-Richtung.Dafür schaue ich die unterste Kante / untersten Punkt (quasi negative z-Richtung) des durchdrungenen Bauteils an und messe den maximalen Abstand in z-Richtung zur der wellenartigen Ebene.Hintergrund des Ganzen ist folgendes:Diese wellenartige Ebene entsteht durch eine MKS-Untersuchung mittels MSC Adams am Fahrzeug (genauer gesagt sind es mehrere Ebenen durch verschiedene Lastfälle und Geschwindigkeiten) und wird dann zusammen mit den CAD-Da ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro ? Werte messen und in Datei schreiben
Ladde2008 am 22.04.2008 um 14:36 Uhr (0)
Moin Leute,habe ein Problem, dass womöglich doch nur mit einem Macro lösbar ist.Und zwar bräuchte ich die Eigenschaften einer Polyline (im Part Assembly) ausgelesen. Diese Polyline setzt sich zusammen aus immer einem geradem Stück und dann einem Kreissegment, wieder ein gerades Stück usw.Nun muß ich wissen wie lang die geraden Stücke sind und wie lang bzw. welchen Winkel die Kreisstücke haben. (Notfalls als Summe, aber besser jedes Stück einzeln). Ggbf. reichen auch die Koordinaten der Punkte, daraus müsst ...
|
| In das Form CATIA V5 Programmierung wechseln |
 |
CATIA V5 Programmierung : Körper und geo. Set per Textbox in Makro umbenennen
NTjaz am 11.10.2013 um 14:26 Uhr (15)
Hallo,bin neu hier und habe mal eine Frage an die Profs.Hatte bis jetzt nichts mir Makro Erstellung zu tun und habe über die Aufnahmefunktion und etwas rumprobieren ein Makro zumErstellen eines Körpers und div. geo. Sets erstellt. (siehe Bild im Anhang).Nun soll, wenn das Makro aufgerufen wird eine Textbox erscheinen in der man den Namen des Körper eingeben kann. z.B. Grundkörper. Daraufhinsoll der Körper automatisch umbenannt werden und die geo. Sets die entsprechende Endung bekommen (z.B. xxx_Grundkörper ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Product Structure nachbilden
Jasiu am 19.08.2004 um 15:00 Uhr (0)
Hallo, ich selectiere über Select.Element ein Product in Baum. In diese Product möchte ich ein Part einbauen. Da es nicht sicher ist in welcher Ebene das Subproduct liegt möchte ich die Struktur nachbauen. Dazu habe ich folgendes Macro geschrieben: Dim uArray As Array uArray = Split(referenceObject.Displayname, / , -1, 1) Dim j Dim n n = UBound(uArray) msgbox CStr(n) msgbox referenceObject.Displayname else msgbox str End If Dim arrayOfVariantOfBSTR1(0) Dim ProStr As Products On Error Resume Next Dim pr ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Documents.Open() mit IGES R19 SP03
HoBLila am 31.03.2011 um 16:15 Uhr (0)
Hallo zusammen,ich hätte ein Mittelschweres Problem. :-)Und zwar habe ich ein Makro:[code]Sub CATMain() Dim NewDoc As Document Set NewDoc = CATIA.Documents.Open("D:PART1.igs")End Sub[code]Dieses Makro macht nichts weiter als ein IGS-File zu öffnen.Sobald dies geschehen ist kann der VBA-Editor nicht mehr verwendet werden und alle UserForms sind völlig ohne Funktion.Dieses Phänomen tritt allerdings nur auf, wenn ich das Makro über Alt+F8 und dann Run ausführe. Führe ich das Makro direkt aus dem VBA Edi ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro Section cut mit neuem Release R19 umfangreich zu modifizieren?
der-quest am 30.09.2009 um 14:54 Uhr (0)
Hallo Leute,eine griffigere Betreffzeile fiel mir nicht ein. Also kurz beschrieben, um was es geht:Ein Makro zur Erstellung von 3D-Schnitten mit Hilfe des 3D Section Cut im Assembly Design funktionierte unter R16 einwandfrei; Basis ist dieser Beitrag. Einzelne Schritte sind:1. Section Cut mit jeder Ebene, die in einem bestimmten Ordner vorhanden ist2. Schnittgeometrie in einem neuen CATPart speichern (geht ohne SPA-Lizenz)3. dortige Geometrien per Copy, Paste As Result in das Ausgangs-CATPart mit den Schni ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Eigenschaften (added Propertities) über eine Eingabemaske vergeben,ändern und löschen
RSchulz am 05.07.2016 um 15:02 Uhr (1)
Hallo,hier ein simples Beispiel zum erstellen von Parametern:Code:Sub CATMain() On Error Resume Next Dim MyDocument As Document Set MyDocument = CATIA.ActiveDocument Dim MyPart As Object Set MyPart = MyDocument.GetItem(1) Dim MyParameters As Parameters Set MyParameters = MyPart.UserRefProperties Dim MyStrParam As strParam Set MyStrParam = MyParameters.CreateString("Param1", "Text1") Set MyStrParam = MyParameters.CreateString("Param2", "Text2") Set MyStrParam = MyParameters.CreateString("Param3 ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Automatische Erstellung von Thick Surface mit Parameterzuordnung
HoBLila am 06.10.2010 um 16:43 Uhr (0)
In deinem Code ist doch eine Zählschleife drin.Bitte such mit einer Suchmaschine nach entsprechenden Hilfen (Schleifen, Rekursion), ich kann hier nicht jedem die Grundlagen beibringen, die nun wirklich trivial (okay Rekursion ist etwas schwieriger, aber bei Dir würden auch zwei verschachtelte Schleifen reichen) sind.Alternativ würde ich Dir auch das Buch Makroprogrammierung von Zhieten und danach das Kochbuch V5 von Hansen empfehlen.Das Zauberwort für Dich habe ich auch schon genannt: Die HybridBodies, des ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
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 ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Anzahl der Dreiecke (Tesselierung) bestimme?!
Diesaster am 06.09.2018 um 09:36 Uhr (1)
Hallo Aitec,habe mal ein bisschen in meiner Freizeit an einem Lösungsansatz gearbeitet.Hier der Code, welcher soweit funktioniert.Code:Sub trianglesAuswerten()Tabelle1.Hyperlinks(1).FollowApplication.Wait (Now + TimeValue("0:00:02"))AppActivate "Triangles"SendKeys "^C", 100AppActivate "Triangles"SendKeys "{ESC}", 100End SubZur Erklärung: Habe es in Excel selbst umgesetzt. Erste Zeile Hyperlink ist der Link, in dem das CATScript Makro liegt. Wollte das Makro eigentlich in Excel mit einbinden, aber dann fähr ...
|
| In das Form CATIA V5 Programmierung wechseln |
