|
CATIA V5 Programmierung : Ansicht Parallel / Perspektive umschalten per Taste
bgrittmann am 11.04.2016 um 09:23 Uhr (1)
ServusDas geht mit diesem kurzen CATScript:Code:Language="VBSCRIPT"Sub CATMain()Dim specsAndGeomWindow1 As WindowDim viewpoint3D1 As Viewpoint3DDim MyViewer As ViewerSet specsAndGeomWindow1 = CATIA.ActiveWindowSet MyViewer = specsAndGeomWindow1.ActiveViewerif TypeName(MyViewer) "Viewer3D" then exit subend ifSet viewpoint3D1 = MyViewer.Viewpoint3Dif viewpoint3D1.ProjectionMode = catProjectionConic then viewpoint3D1.ProjectionMode = catProjectionCylindricelse viewpoint3D1.ProjectionMode = catProjectionCo ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Ansicht Parallel / Perspektive umschalten per Taste
Gansen am 11.04.2016 um 10:21 Uhr (1)
Hallo bgrittmann,ein Kollege hatte sich ohne mein Wissen auch bereits dran gegeben. Dein Makro oben endet mit einer Fehlermeldung in Zeile 5.Das Makro meines Kollegen funktioniert:Code:Language="VBSCRIPT"Sub CATMain()Set specsAndGeomWindow1 = CATIA.ActiveWindowSet viewer3D1 = specsAndGeomWindow1.ActiveViewerSet viewpoint3D1 = viewer3D1.Viewpoint3DIf viewpoint3D1.ProjectionMode = catProjectionConic Thenviewpoint3D1.ProjectionMode = catProjectionCylindricElseSet viewpoint3D1 = viewer3D1.Viewpoint3DSet viewpo ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Fläche über Polynom erstellen
Chuk am 11.04.2016 um 12:45 Uhr (1)
Hallo Bernd,du hast Recht, machbar ist es verumtlich. Allerdings möchte ich die Anzahl an Skizzen gering halten. Zudem muss ich durch die Normierung auf einen Wertebereich unnötige Rechnungen machen, die zusätzlich Ungenauigkeit in mein System bringt.Daher habe ich mich dazu entschlossen alles über eine Punktewolke zu machen, die ich extern erzeuge und dann in Catia lade.Trotzdem Danke für deine Mühe!Gruß Chuk
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Instanznamen eines Pointed Document
IchbastelinVB am 12.04.2016 um 17:37 Uhr (1)
Hier kommt der bisherige Code und ein Bild Dim stiEngine As StiEngine = CATIA.GetItem("CAIEngine") Dim stiDbItem As StiDBItem = stiEngine.GetStiDBItemFromAnyObject(ProdAdap.ReferenceProduct.Parent) Dim stiChildren As StiDBChildren = stiDbItem.GetChildren() For a = 1 To stiChildren.Count Debug.Print(stiChildren.Item(a).GetDocumentFullPath) Next
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Makro zum zählen von Bohrungen
MarcL68 am 14.04.2016 um 12:45 Uhr (1)
Hallo,Kann dir das helfen?Code:Sub CATMain()Set partDocument1 = CATIA.ActiveDocumentSet selection1 = partDocument1.Selectionselection1.Search "Name= Point*,all"oCount1 = selection1.Count2Set selection2 = partDocument1.Selectionselection2.Search "Name= Line*,all"oCount2 = selection2.Count2msgbox "Point:" & oCount1 & " Line:" & oCount2End Sub------------------GrussMarc
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Punktwolke import
Chuk am 14.04.2016 um 14:25 Uhr (1)
Hallo Zusammen,ich suche mal wieder die Umsetzung eines Catia-Button im CATScript.Es geht um das importieren einer Punktwolke. Manuell nutze ich dazu die Funktion "Importieren" im Digitized Shape Editor. Kennt einer den Befehl dazu? (sofern er existiert)Weder die Forensuche noch die CAA konnte mir helfen..Aufgrund der Dateigröße (ca 10k Punkte) ist es auch nicht möglich die Punkte in akzeptabler Zeit einzelnd zu importieren. Die Quelldatei kann als asci,txt, csv o.ä vorliegen, wie es nötig ist.Danke!Chuk
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Punktwolke import
joehz am 14.04.2016 um 16:21 Uhr (1)
Hi Chuk,vielleicht hilft Dir das weiter:http://catia2.cad.de/index.php/de/downloads/skripts-applikationen/441-punkte-import-aus-cvs-dateiTschau,Joe------------------Inoffizielle Catia Hilfeseite
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Punktwolke import
Chuk am 14.04.2016 um 19:50 Uhr (1)
Hi Joe,ich habe das Skript ausprobiert. Aus den paar Sekunden, die für wenige 100 Punkte gebraucht werden sind bei meinen 9600 Punkten etwa 42 Minuten geworden. Zudem wird Catia durch die große Anzahl an Elementen sehr langsam und neigt dazu abzustürzen. Für meine Anwendung daher leider nicht zu gebrauchen, Schade!Wenn ich meine Punktewolke manuell einladen bin ich schneller und brauche deutlich weniger Ressourcen.Dennoch Danke!GrußChuk
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Punktwolke import
bgrittmann am 15.04.2016 um 10:30 Uhr (1)
ServusIMHO lässt sich dies mit Catia nur mit hohem Aufwand per Script (VB.net von außen darauf zugreifen und per WindowsAPI die Eingaben "simulieren") erschlagen.Kannst du nicht die Flächenerstellung in dem "anderen Programm" durchführen? (welches hast du)GrußBernd------------------Warum einfach, wenn es auch kompliziert geht.
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CATScript in ein VBA umwandeln
joehz am 19.04.2016 um 12:02 Uhr (1)
Hi 4ppu,hast Du das Script schon in ein VBA-Modul kopiert?Und laufen lassen?Und ...?Tschau,Joe------------------Inoffizielle Catia Hilfeseite
|
| In das Form CATIA V5 Programmierung wechseln |
 |
CATIA V5 Programmierung : Einen PartBody über Scale verändern
4ppU am 21.04.2016 um 07:22 Uhr (15)
Guten Morgen alle zusammen,ich hab da mal wieder eine Frage. Eigentlich arbeite ich mit dem Buch von Ziethen, aber das liegt heute leider zuhause auf dem Schreibtisch Ich möchte ein Makro durchlaufen lassen in dem ein PartBody über Boolesche Operationen verändert wird (das hab ich schon mal) und anschließend wird dieser Body über die "Scale" Funktion verändert (das brauche ich noch).Ich wollte es jetzt mal mit dem Makro Rekorder versuchen, aber irgendwie scheint mir das zu viel zu sein.Also es funktionie ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Formeln von Selection ausschließen
moppesle am 28.04.2016 um 08:58 Uhr (1)
Hallo,im Moment schließe ich eine Formel aus einer Selection folgendermaßen aus.Code:For Each aktiRel In oRel If aktiRel.Name "DINNormaFormula" Then oSel.Add aktiRel oSel.Delete NextNun möchte ich mehrere ausschließen.Code:For Each aktiRel In oRel If aktiRel.Name "DINNormaFormula" Or "BendRadiusPartRadiusWallOnEdge" Then oSel.Add aktiRel oSel.Delete NextLeider funzt das nicht.Es werden nun beide Formeln zur Selection hinzugefügt.Hat jemand eine Idee hierzu?------------------Gruß UweAuch Cat ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Formeln von Selection ausschließen
joehz am 28.04.2016 um 09:53 Uhr (1)
Hi Uwe,Zitat:Nun möchte ich mehrere ausschließen.Code:For Each aktiRel In oRel If aktiRel.Name "DINNormaFormula" Or "BendRadiusPartRadiusWallOnEdge" Then oSel.Add aktiRel oSel.Delete NextFrage: Was ergibt ... ?("DINNormaFormula" Or "BendRadiusPartRadiusWallOnEdge")Probier mal Code:If (aktiRel.Name "DINNormaFormula") Or (aktiRel.Name "BendRadiusPartRadiusWallOnEdge") ThenTschau,Joe------------------Inoffizielle Catia Hilfeseite
|
| In das Form CATIA V5 Programmierung wechseln |
