|
CATIA V5 Programmierung : Volumen Selektion
apollo11 am 03.11.2007 um 10:17 Uhr (0)
Wenn du mit Selektionen arbeiten willst musst du die Objekte zwischenspeichern, da es nur EINE Selektion gibt! Aus wenn du sie mehrmals deklarierst so ist es schlussendlich immer die selbe (innerhalb des Dokuments).Du könnstest aber eine Schleife über alle selektierten Objekte laufen lassen.Code:Dim Sel As SelectionSet Sel = CATIA.ActiveDocument.SelectionDim Arr1()Dim Arr2()ReDim Arr1(Sel.Count)ReDim Arr2(Sel.Count)Dim Cnt1 As IntegerDim Cnt2 As IntegerDim CurrentObjFor i=1 To Sel.CountSet CurrentObj = Sel ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Brauche Hilfe Makro umbenennen Geo Sets im Part
olleiCAD am 30.11.2018 um 08:29 Uhr (1)
Folgendes Makro soll mir alle Körper, umbenennen, beginnend mit einer Zahl die ich eingebe.Code:Sub CATMain() Dim productDocument1 As PartDocument Set productDocument1 = CATIA.ActiveDocument Dim selection1 As selection Set selection1 = productDocument1.selection Dim Eingabe1 As String Eingabe1 = InputBox ("Bitte geben Sie eine Startnummer ein.", "Eingabe Startnummer", Eingabe1) selection1.Search "CATPrtSearch.BodyFeature,all" Dim Imax As Integer Imax = selection1.Count ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter übergeben zwischen Modulen
Tiberius am 21.09.2011 um 20:53 Uhr (0)
Hallo,ich habe in einer catvba Datei mehrere Module, Hier mal Modul A und B. Im Modul A habe ich eine private Sub in der ich des Modul inkl. eines Parameters aufrufen möchte. Leider bekomme ich es nur hin ohne Übergabe eines Parameters.Hier der Codeauszug vom Modul A:Private Sub cmdHilfe_Click()Code:Dim sFilePathDim sFileNameDim sModuleDim sProcedureDim sFilePathAndNameDim CatSysServDim vRetValDim sParams()Redim Preserve sParams(0)sParams(0) = "Ausgabe"sFilePath = "ServerCATIAMAKROSTEST"sFileName = "Makro_ ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : überflüssige Dateien im Verzeichnis entfernen
RSchulz am 30.11.2012 um 09:52 Uhr (0)
Hallo Hawaii,ich habe für ähnliche Anforderungen schon kleine Progrämmschen geschrieben und da wir hier im Programmierungsforum sind, gehe ich davon aus, dass du das auch möchtest.Eigentlich ist das ganz simpel. Du brauchst nur deine Rootbaugruppe laden und die geladenen Dokumente via "CATIA.Documents" auslesen und schreibst den "Document.Fullname" in ein Array. Danach vergleichst du diese mit z.B. im .Net "System.IO.File" im Verzeichnis und löschst oder schreibst eben alle, die nicht geladen sind, in eine ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : ProductToPart für Arme
Sylas am 19.04.2018 um 09:48 Uhr (1)
Zitat:Original erstellt von razzor88:Guten Morgen, Ich hatte vergessen zu erwähnen,daß bei meinem Programm nur Sachen die im Show stehen. D.H. Alle ausgeblendeten Products oder Parts werden nicht kopiert. Genauso wie Ausgeblendete Körper.Kein Part (Body) ist im NoShow. Andere Idee?Zitat:Original erstellt von bgrittmann:ServusUnd was ist an den Teilen die nicht kopiert werden anders?Schon mal versucht nachzuvollziehen warum das Makro von Joe nicht klappt (schrittweise ausführen und nachvollziehen)?Wenn du ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : ImposedVertexRadius - Werte des Radius
imation1999 am 08.07.2013 um 21:43 Uhr (0)
Hallo,in diesem Fall:Variable Fillet ist schon vorhanden (mit mehreren Punkte --- die "Nummer" des Punktes sind unbekannt)ich möchte weitere Punkte hinzufügen, dann die Werte ändern.Zur Zeit läuft alles ganz schön unter VBA, aber ich soll nach dem Ablauf die Punkte kopieren, dann austauschen (Replace). So werden die zugefügte Punkte wieder sichtbar sein.EDIT: Eine von Euch testen?Code:Sub CATMain()Dim partDocument1 As DocumentSet partDocument1 = CATIA.ActiveDocumentDim part1 As PartSet part1 = partDocument ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : dialogfenster öffnen und bearbeiten
RSchulz am 03.06.2013 um 08:48 Uhr (0)
Zitat:Original erstellt von adrian83:hallo!besteht die möglichkeit in catia per VB-makro ein bestimmtes dialogfenster zu öffnen,wenn ich weiß wie es heißt und dort dann so zu tun,als würden per maus buttons gedrückt,häkchen gesetzt usw?Hallo Adrian,ja das geht bzw. leider nur über Umwege. Hierfür brauchst du die Windows-API.Hier mal ein bissel Beispielcode.Code:Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As LongPrivate Dec ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Punkte Search. Und Selection
HoBLila am 24.02.2012 um 15:08 Uhr (0)
Code:Dim arrRefWokrk() As INFITF.ReferenceDim iElem As IntegerDim selWork As INFTIF.SelectionSet selWork = CATIA.ActiveDocument.SelectionCall selWork.ClearCall selWork.Search("((((((FreeStyle.Point + 2D Layout for 3D Design.Point) + Sketcher.Point) " _ & "+ Drafting.Point) + Part Design.Point) + Generative Shape Design.Point) + Functional Molded Part.Point);scr")ReDim arrRefWokrk(1 To selWork.Count2)For iElem = 1 To selWork.Count2 Set arrRefWokrk(iElem) = selWork.Item2(iElem).Reference ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : txt-file (Zeile bestimmen)
newmann am 06.09.2011 um 13:11 Uhr (0)
Hallo,also mit der "ini-Datei" kenne ich mich nicht so aus habe daher deinen Code genommen den "stumpf" kopiert um den Test durchlaufen zulassen und bin gleich auf einen Fehler gelaufen ( Zeile:Call M_RW_INI.WriteValue("MeineSektion", "MeinKey", "MeinWert", PathToINIFile).Wollte daher die Variante mit dem Array ausprobieren und bekomme die Zweite Zeile nicht ausgelesen.Habe einen txt-File (z. b. mit 2.Zeilen)1.Zeile: Test;100;250;Basis;2.Zeile: Test;150;230; High;";" soll die Trennung für den späteren Spli ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selektion
Augustiner am 30.01.2006 um 14:10 Uhr (0)
Hallo zusammenhab ein kleines Problemchen.Möchte ein bestimmtes element in einem definierten Geometricalset selektieren.Der Name des g.Sets ist immer gleich darin befinden sich 1-3 elemente(Ebenen oder flächen).Ich möchte immer das letzte hineinkopierte elemnt finden.Hab mir auch schon ein Makro gebastelt.Language="VBSCRIPT"Sub CATMain()Dim partDocument1 As DocumentSet partDocument1 = CATIA.ActiveDocumentDim selection1 As SelectionSet selection1 = partDocument1.Selectionselection1.Search "(Name=*external*) ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Grundlagen VB Script
Zed am 13.08.2021 um 14:33 Uhr (1)
Hallo!In Schriftlicher Form quasi... Darf ich den Link hier posten?#IfWinActive CATIA V5MButton::SendInput {Mbutton down}{RButton down} ; Hold down middle and right.Loop{ Sleep, 10 GetKeyState, state, MButton, P if state = U ; The key has been released, so break out of the loop. break }SendInput {MButton up}{RButton up} ; Release the mouse buttons.return;---------------XButton1::SendInput {Mbutton down} ; Hold down middle.Loop{ Sleep, 10 GetKeyState, state, XButton1, P if state = U ; The key has ...
|
| In das Form CATIA V5 Programmierung wechseln |
Test01.zip |
CATIA V5 Programmierung : PowerCopy in Produktumgebung ausführen
Bernod am 26.04.2010 um 15:35 Uhr (0)
Hallo Daniel,vielen Dank für deine Antwort.Option Explicit habe ich bewusst nicht angegeben, da ich dachte dies bedeutet nur, dass undeklarierte Variablen nicht verwendet werden dürfen. Welchen Vorteil hätte ich dadurch? Oder habe ich das falsch verstanden?Und meine Variable "IntPointObj" ist global deklariert mit "Dim IntPointObj". Ich verstehe den Unterschied zwischen der Deklaration mit Dim, Public oder Private nicht.Versuche ich dein Makro auszuführen, dann passiert nichts bei mir. Weder eine Fehlermel ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : selektion während eines Makros
u01dz am 29.08.2003 um 07:32 Uhr (0)
Hi, probiere mal das hier: ******************************************************************* Sub CATMain() Voraussetzung: Das CATPart verfügt über eine Fläche und einen Punkt, der auf der Fläche liegt ================================================ Dim Dok, Bauteil, Selektion Set Dok = CATIA.ActiveDocument Set Bauteil = DoK.Part Set Selektion = Dok.Selection Selektion der beiden Elemente ( Effiziente Konstruktion mit Makros , S. 50) ============================================= Dim Auswahl(0) ...
|
| In das Form CATIA V5 Programmierung wechseln |
