|
CATIA V5 Programmierung : alle Elemente eines Typs für weiter Operationen
Christian.O am 01.12.2010 um 17:31 Uhr (0)
Servus,wie wärs hiermit?Code:***Geometrisches Set auswählen strSearchFilter(0) = "HybridBody" strSel = objSel.SelectElement2(strSearchFilter, "Wählen Sie das Geometrische Set mit den Punkten aus", False) ***Auswertung der Selektion If strSel = "Normal" Then ***Performanceerhöhung der Suche CATIA.HSOSynchronized = False ***Element suchen objSel.Search ("Part Design.Point ;sel") CATIA.HSOSynchronized = True Else MsgBox "Abbruch der Selektion durch den User." & vbNewLine & _ "Das Mak ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : GetCoordinates
Günter K. am 26.08.2005 um 08:32 Uhr (0)
Hallo Thomas,die Funktion GetPoint ist eine Methode des Objekts Measurable.Ich habe deinen Code entsprechen angepasst und getestet.Es sollte nun laufen:Sub CATMain () Dim Was(1)Was(0) = "Point"Was(1) = "Vertex"Dim UserSel As SelectionSet UserSel= CATIA.ActiveDocument.SelectionUserSel.ClearDim E As CATBSTRE = UserSel.SelectElement(Was, "Du kannst jetzt einen Punkt wählen!", true)If E = "Normal" ThenElseMsgBox ("Abbruch")End IfDim MySelection as AnyObjectSet MySelection = UserSel.Item(1).ValueMsgBox (MySelec ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Farbe zurücksetzen
O Shovah am 29.11.2012 um 00:45 Uhr (1)
Hallo,entschuldigt, dass ich einen so alten Thread wieder ausgrabe, aber das war das einzige was ich über die Suche zu meinem Problem gefunden habe. Ich weiß nicht was ich versehentlich geändert habe, aber meine Parts sind default nicht mehr grau, sondern weiß. Von Programmierung und Makros in Catia habe ich keine Ahnung und kann den Erläuterungen hier nicht immer ganz folgen, aber alles was ich bisher ausprobiert habe hat nichts gebracht, auch dieser Tipp:Zitat:Original erstellt von elharry:RM auf PartBod ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Edit Links - Load
DuffM4nUS am 14.03.2018 um 22:39 Uhr (1)
Hallo Gemeinde,kann man den Befehl "Load" in Edit-Links (siehe Screenshot) per VBA automatisieren?Denn wenn ich folgenden Code laufen lasse, dann findet dieser nur dann alle Links wenn diese vorher mittels des Load-Button in die Session geladen wurden.(Es handelt sich um ein CATPart als ActDoc)Code:Sub Main() Dim oStiEngine As StiEngine Dim oStiDBItem As StiDBItem Dim oStiDBChild As StiDBChildren Set oStiEngine = CATIA.GetItem("CAIEngine") Set oStiDBItem = oStiEngine.GetStiDBItemFromAnyObject(CATIA. ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Zugriff auf Part im Produkt
blackh4wk am 23.07.2009 um 20:17 Uhr (0)
Private Function Rueckgabe() As Document Set Rueckgabe = Nothing Dim i As Long For i = 1 To CATIA.Documents.Count Dim p_Document As Document Set p_Document = CATIA.Documents.Item(i)Set Rueckgabe=p_Document If (TypeName(p_Document) "PartDocument") Then GoTo Continue Dim p_PartDoc As MECMOD.PartDocument Set p_PartDoc = p_Document Dim p_Part As MECMOD.Part Set p_Part = p_PartDoc.Part On Error GoTo ContinueContinue: On Error GoTo 0Bei diesem Teil komme ich nicht weiter, Hie ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Ausführen einer PowerCopy unter VBA
DanielFr. am 22.04.2010 um 10:35 Uhr (1)
Hallo ,ich habe hier auch noch eine kleine Anmerkung zum Thema Filterstrings:Im Anhang findest gibt es ein *.CATvba Projekt das den TypeName einer selektierten Variablen ausgibt (kopieren in die Zwischenablage ist auch möglich). Mit Hilfe des Makros können die Filtertypen schnell per Selektion ausgelesen und kopiert werden um sie in den Code wieder einzufügen.Falls das ganze Probleme macht (User defined type... in der Funktion) muss noch folgender Verweis zum Projekt hinzugefügt werden (Microsoft Forms 2.0 ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : körper kopieren und einfügen
snow am 12.03.2009 um 00:14 Uhr (0)
hallo cad-community ich will den hauptkörper kopieren und dessen (unverlinkte) kopie wieder einfügen.klappt soweit auch, bis darauf das der neue körper unter dem hauptkörper und nicht in dem dafür vorgsehenen körper (funzt - siehe bild) landet .Oder gibt es eine möglichkeit den erstellten neuen körper direkt in einem zug umzubenennen?---------kopierenDim UserSel As SelectionSet UserSel= CATIA.ActiveDocument.SelectionUserSel.ClearUserSel.Add Koerper2 ist der HauptkörperUserSel.Copy UserSel.Clear--------- ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Skizze im Raum Ausrichten
INLU am 18.06.2008 um 21:01 Uhr (0)
Hallo Lila, Hallo Zoltandanke für die Antworten. Leider führen sie in meinem Fall nicht zum Erfolg. Ich versuche das Problem etwas simpler zu gestalten. Folgender Code soll nur, wie Lila beschrieben, die Vektoren der Skizzenachse auslesen. Beim Start bekomme ich eine Fehlermeldung (siehe Anhang). Ihr könnt es ja mal selber Probieren. Ich habe es auch mit Variant als Datentyp probiert. code:Dim geoele As HybridBodyDim hb1 As HybridBodiesDim meinpart As PartDim skizzen As SketchesDim skizze As SketchDim ursp ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Geometrische Sets erstellen
Tapani. am 05.07.2006 um 16:46 Uhr (0)
moin,das mit den querverweisen muss ich noch mal üben :-)zu den Sets: Wenn du die HybridBodies-Collection hast, kannst du ja in einer Schleife durchgehen, und die Namen aller bereits vorhandenen HybidBody-Objekte mit deinen Pflicht-Sets vergleichen.so à laCode:dim ar()pflichtnamen="Becks:Jever:Budwiser:Erdinger"set hybs = mypart.HybridBodiesa = split,(pflichtnamen,":")for j = 1 to UBound(a)if hybs.Count 0 then found = 0 for i = 1 to hybs.Count if a(j) = hybs.Item(i) then found = 1 end if nextend ifif ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Datei öffnen, Voreinstellung für Pfad
cuco am 15.03.2011 um 17:33 Uhr (0)
Hallo,ich habe das selbe Problem. Ich weiß, dass er standard Befehl in Excel VBA über den eintrag einer Textbox folgendermaßen wählbar ist und auch funktioniert.Set fs = CreateObject("Scripting.FileSystemObject")ChDir "C:Users"ChDrive (Mid("C:Users", 1, 3))Dateiname = Application.GetOpenFilename _ ("XLS (*.xls),*.xls,XLSX (*.xlsx),*.xlsx")Das Problem ist, dass dieser Typ (Application und auch GetOpenFilename) in Catia nicht funktioniert.Das "CHDir" vor deinem Befehl, den auch ich in Catia für meine Da ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Problem mit SaveAs
K.Siebert am 14.01.2008 um 10:12 Uhr (0)
Hallo Lusilnie;Es Funktioniert jetzt !!!!!!!!!! Der Code 1.Ist der Code den ich brauchte damit dieses Skript funktioniert Der Code 2.Hatte die Auswirkung das er überhaupt nichts gespeichert hatte habe den alten Code verwendet Der Code 3.Funktioniert mit (1) und mit (I) warum keine Ahnung Ich bin noch nicht so bewandert mit Skripts Schreiben könntest du mir nochmals bei einem Anderem Skript helfen? Da habe ich Probleme mit dem Count der Zählt stur nach oben ohne zu erkenn das Teile das erste mal vorhande ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Rotationsachse
Scipio am 10.05.2010 um 14:03 Uhr (0)
Hallo liebe cad gemeinde versuch mich gerade mit Catia-Makro Programmierung(VBSCRIPT). In meinem Makro kopiere ich ein Geometrisches Set von einem Produkt in ein anderes dabei geht die Referenz der Rotationsachse einer Ebene verloren. Wie kann ich diese neu vergeben. Bzw Den Benutzer eine Achse auswählen lassen und diese dan als Rotationsachse definieren. wär klasse wenn mir jemand weiter helfen könnte hab beim durchstöbern des Forums leider noch nix gefunden.Language="VBSCRIPT"Sub CATMain()//////////// ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CATIA & VB.NET
Jens Hansen am 27.03.2008 um 07:55 Uhr (0)
Hallo,das Problem ist die externe Deklaration auch v5 vie den interopilierten DLL... (hä???) .. d.h. dein Programm arbeitet zum Teil schneller als V5 selbst ... V5 kommt manchmal (oft) nicht mit den Anweisungen eines externen Zugriffs hinterher. Daher steh deinem Programm dann benötigte Infos oder Zustände von V5 (noch) nicht zur Verfügung und es kommt zum Fehler; den du aber mit Error Resume Next abwürgst.Lösung:- V5 über LateBinding machen, oder- eine Zustandsabfrage (mit Warteschleife) einbauen, oder- p ...
|
| In das Form CATIA V5 Programmierung wechseln |