|
CATIA V5 Programmierung : Annotations TPSView selektieren
roccat am 22.10.2010 um 15:05 Uhr (0)
Hallo Henry,bei mir gehts, hab nur noch dein "priv_viewWork" dimensioniert.Dann hats eigentlich geklappt.Code:Option ExplicitSub start() userSelectViewEnd SubFunction userSelectView() As String Dim docWork As INFITF.Document Dim selWork As INFITF.Selection Dim arrVarTypes(0) As Variant Dim objBuffer As Object Dim priv_viewWork As TPSView userSelectView = "" On Error Resume Next Set docWork = CATIA.ActiveDocument If (docWork Is Nothing) Then Exit Function ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Anfängerhilfe mit Selection
FreshBlood am 25.03.2009 um 15:16 Uhr (0)
also meine idee / code sieht wie folgt aus:Code:Dim UserSelection As SelectionSet UserSelection = CATIA.ActiveDocument.SelectionIf InStr(UserSelection.Item(1).Document.FullName, ".CATPart") 0 ThenDim TempPart As PartSet TempPart = UserSelection.Item(1)Set pList = TempPart.ParametersElseIf InStr(UserSelection.Item(1).Document.FullName, ".CATProduct") 0 ThenDim TempProduct As ProductSet TempProduct = UserSelection.Item(1)Set pList = TempProduct.ParametersElse Und hier will ich die Fälle abhandeln wo der Us ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : ALLinONE:CATPart mit Material
DanielFr. am 26.05.2009 um 07:48 Uhr (0)
Hallo Martin,diese Option gibt es in CATIA definitiv NICHT.Ich glaube auch mit dem Zusammenkopieren von Einzelscripten wird es schon schwer weil deine Problemstellung schon recht komplex ist.Prüfen kannst du z.B. über die Suchfunktion. Sprich das Produkt rekursive durchlaufen, ein Part nehmen innerhalb dieses Parts nach Materialen suchen. Ist der Count = 0 dann ist kein Material vorhanden. Hier kannst du auch nach Bodies suchen um festzustellen wieviele Bodies das Part hat. Ich habe schon einmal angefangen ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Update-Fehler bei UDF-VB Script
gladly am 31.10.2011 um 13:22 Uhr (0)
Vorab, entschuldigt das Doppelposting, aber da dies nun die Lösung zu sein scheint, wollte ich diese hervorheben.Also... Mit folgendem Code habe ich es hinbekommen. Mir kam in den Sinn, dass man ja auch anders, als nur mit der Selection löschen kann. Diese möglichkeit erzeugt anscheinend kein erneutes Update!Folgend das korregierte VB ScriptCode:set mPart = Catia.ActiveDocument.PartSet mHybridShapeFactory = mPart.HybridShapeFactoryfor i = hb_work.hybridshapes.count to 1 Step -1 Set ref_mCrv = mPart.Create ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : leere Selektion definieren
Machiwi am 23.07.2012 um 11:57 Uhr (0)
Hey Daniel,ich hab deine Vorschläge mal durchprobiert. Nur leider hab ich immer bei "selection1.Items.Count" immer den Fehler "object doesnt support this property or method".Hab ich irgendeine Deklarierung oder so vergessen?Mein vollständiger Code lautet:Sub CATMain()Dim partDocument1 As PartDocumentSet partDocument1 = CATIA.ActiveDocumentDim part1 As PartSet part1 = partDocument1.PartDim hybridShapeFactory1 As HybridShapeFactorySet hybridShapeFactory1 = part1.HybridShapeFactoryDim parameters1 As Parameter ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CATIA.Part rename partbody und publication nach partnumber
mattnic am 22.10.2017 um 10:18 Uhr (1)
Hallo Liebe Programierer,ich bin auf der Suche nach einem Markro zum umbenennen des Partbodys und der Publication. Die Information sollte aus den Parteigenschaften entnommen werden (Partnumber). Ein weiteres Kriterium ist alle Bodies auf Layer 200 zu setzten.Zur Erklärung,bei uns verlangt der Kunde für jede neue Farbkonfiguration auch ein neues 3D Element was sich nur in der Partnumber unterscheidet. Der Partbody muss den Namen der Partnumber haben, die Publication wird z.B. für Spiegelteile benötigt. Dami ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : pps Datei in/ über CATIA öffnen
RSchulz am 20.10.2010 um 12:44 Uhr (0)
Versuch es mal mit...Code:Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _ (ByVal hwnd As Long, ByVal lpOperation As String, _ ByVal lpFile As String, ByVal lpParameters As String, _ ByVal lpDirectory As String, ByVal nShowCmd As Long) As LongPrivate Sub CATMain() Dim ProcessID as Long run ShellExecute(ProcessID, "open", "C:meineDatenTest.pps", "", "", vbNormalFocus)End SubErgänzung: Du könntest natürlich auch mit...Code:Shell ("C:Program Files (x86)"Officeordn ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Copy / Paste in einer Produkt-Part-Struktur
Physimathi am 31.07.2007 um 11:50 Uhr (0)
Hallo,ja, den Körper.1 habe ich so im Part (B.CATPart) veröffentlicht.Dim ProduktDokument As DocumentsDim AnyPart As DocumentDim AProdukt As ProductDim APart As PartSet ProduktDokument = CATIA.DocumentsSet AnyPart = ProduktDokument.Item("B.CATPart")Set AProdukt = AnyPart.GetItem("B")Set APart = AnyPart.PartDim body1 As BodySet body1 = APart.FindObjectByName("Körper.1")Dim refPub As ReferenceDim publications As publicationsDim publication As publicationSet refPub = AProdukt.CreateReferenceFromName("B/!Körpe ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Bitte um Hilfe im Drawing
Speedway04 am 30.03.2009 um 13:48 Uhr (0)
Hallo liebe VBA-Gemeinde,ich habe folgendes Problem. Ich erstelle im drafting 4 Linien. Die sind als Line2D deklariert. dannach mache ich folgendes Code (VBA): Dim Mysel1 As Selection Dim Linst As VisPropertySet Set Mysel1 = CATIA.ActiveDocument.Selection Mysel1.Clear Mysel1.Add (MyLin1) Mysel1.Add (MyLin2) Mysel1.Add (MyLin3) Mysel1.Add (MyLin4) Hier gibt es das problem. Er gibt die fehlermeldung raus das er die " Object doesent support this property oder methode"Wenn ich die zeile auskommentiere dann ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Absturz bei AddNewPolyline
Erich Z am 03.06.2009 um 18:18 Uhr (0)
Hallo!Ganz unangenehmer weise verabschiedet sich unser Programm bei der Funktion AddNewPolyline(). Aber das beste kommt noch: nicht im Debug sondern nur wenn das exe ausgeführt wird!!! Wir haben es bis auf die Zeile reproduzierbar eingegrenzt (verschiedene Computer, B16_SP5). Codeausschnitt:Bdy.AppendHybridShape(Fctry3D.AddNewPointCoord(P1_X, P1_Y, P1_Z));PolyLine = Fctry3D.AddNewPolyline();Der Punkt wird erzeugt - also ist die Fctry3D ok. Bei der nächsten Zeile ist die Applikation weg (ohne das eine Excep ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : AssemblyFeature AffectedComponent auslesen
Randle am 20.05.2025 um 13:32 Uhr (1)
Hallo,nun brauchte ich diese Funktion selber mal und bekomme nun die Meldung "Klasse nicht registriert" bei der Stelle: Code:Set oAssemblyFeature = oAssemblyFeatures.Item(i)Ich habe nun schon alles mögliche probiert: - auf 2 anderen Rechner getestet. - das verwendete Release neu registriert. - VBA neu installiert. - verschiedene CATIA Umgebungen (Kunde/Standard) probiert. - Microsoft Visual C++ Redistributables repariert, neu installiert. - usw.Hat jemand eine Idee?Eigentlich sollte "oAssemblyFeatures" ja ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Rat zu Visual Studio
HoBLila am 07.03.2011 um 18:06 Uhr (0)
Ja, der Debugger vom Visual Studio ist echt nicht so toll...Auch das IntelliSense wird erst ab 2010 langsam erträglich. :-)Zu beachten gäbe es aber dennoch eine Sachen:Wenn Du andere DLLs oder OCX-Dateien anziehst, müssen diese nicht zwangsläufig auf dem Zielrechner vorhanden sein. Dies gilt vor allem für Office-Anwendungen.Es darf nur maximal 1 CATIA geöffnet sein, denn über COM kannst Du nicht klar unterscheiden.------------------Mit freundlichen Grüßen,Henry Schneideralias LilaEs gibt einen ewigen Wettk ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Eigenschaften von Selektion zurücksetzen
geekv5 am 02.10.2012 um 12:04 Uhr (0)
Hatte jetzt zwei Ideen:1) Die einzelnen Eigenschaften manuell auf einen von mir gewählten Standardwert setzen (Farbe, Transparenz, Linienstärke usw..) - Anwendung auf Kinder? (großer Aufwand?)2) Das Fenster per Startcommand aufrufen und mit der Win32 API die Checkbox setzen und "OK" klicken..Edit: Habs hinbekommen, hier Variante (2) mit anschließender Änderung der Linienstärke:Code:Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Lo ...
|
| In das Form CATIA V5 Programmierung wechseln |
