|
CATIA V5 Programmierung : Ergebnisse in Textdatei übertragen
HarleKinX am 01.03.2011 um 13:41 Uhr (0)
Ja genau das hat gefehlt, nun meckert er aber das End if an.Habe mal das Öffnen der Datei auf ein Extra Button gelegt:For Each datei In ordner.FilesIf InStr(datei.Name, "Ergebnisse") 0 ThenSet mydatei = CATIA.FileSystem.CreateFile(saveInBox.Text + "Ergebnisse.txt", True)MsgBox mydatei.NameSet t = mydatei.OpenAsTextStream("ForReading")Exit ForEnd IfNextWie muss ich die Zeile mit For Each datei In deklarieren bzw erfassen, damit das Programm den genauen Pfad hat?
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Ergebnisse in Textdatei übertragen
HarleKinX am 01.03.2011 um 13:30 Uhr (0)
Ok,nun hab ich das Problem, das er alles macht, nur nich die Datei direkt gleich öffnet.habe das versuchtIf instr(datei.name , "Auslesedatei") 0 thenSet mydatei = CATIA.FileSystem.CreateFile(saveInBox.Text + "Ergebnisse.txt", True)msgbox mydatei.nameSet t = mydatei.OpenAsTextStream("ForReading")Exit Forend ifNextund dann meckert er immer die Zeile "Exit for" an. Hab ich da komplett was falsch?
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Referenzpart aus Ansicht
DanielFr. am 02.12.2009 um 11:49 Uhr (0)
Hallo Klaus,so ich bin jetzt heute mal dazu gekommen mir das mal anzuschauen und dabei ist das folgende Makro (im Anhang) rausgekommen. Also bei mir schreibt der eins a die PartNumber raus egal ob die Ansicht jetzt vom PartBody oder einem anderen Body abgeleitet ist. Ich hab dir mal die *.bas Datei angehängt dann kannst es mal Step-ByStep Debuggen. Die ganzen Speicherung etc. musst du selber natürlich noch implementieren ------------------MFG DanielSysteminformation | Inoffizielle CATIA Hilfeseite | CATIA ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Dokumentumgebung aktuell setzen
meisterlumpi am 17.08.2011 um 18:27 Uhr (0)
Hallo,das sieht schlecht aus. das thema wurde auch schon behandelt siehe: http://ww3.cad.de/foren/ubb/Forum137/HTML/000784.shtml#000005 an die DL names kommste mitCode:Sub CATMain() Dim settingControllers1 As SettingControllers Set settingControllers1 = CATIA.SettingControllers Dim dLNameSettingAtt1 As DLNameSettingAtt Set dLNameSettingAtt1 = settingControllers1.Item("CATSysDLNameSettingCtrl") Dim varArr() varArr = dLNameSettingAtt1.GetDLNameList For i = LBound(varArr) To UBound(varArr) Msg ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Befehlsliste für Catia V5
doktor4986 am 01.03.2011 um 08:34 Uhr (1)
Hallo Michael, ich auf der gleichen Suche wie du.Ich habe auch bereits in dem Systemordner wie oben beschrieben reingeschaut, kann damit aber nicht viel anfangen.Hast in der zwischen Zeit etwas anderes gefunden, bzw. könntest du mir die Behlsliste in englisch zu kommen lassen?MfG doktor4986
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Winkel aus Rotationsmatrix
richter2 am 07.12.2009 um 08:48 Uhr (0)
Hallo,ich lese mit GetComponents PositionArray die Transformationsmatrizen der einzelnen Baugruppen und Bauteile aus. Mit folgenden Rechenoperationen schließe ich auf die resultierende Transformationsmatrix des aktuellen Bauteils. So weit funktioniert das ganze auch. In der letzten stehen auch die exakten Verschiebungen des aktuellen Bauteils.res(0) = a(0) * b(0) + a(1) * b(3) + a(2) * b(6)res(3) = a(3) * b(0) + a(4) * b(3) + a(5) * b(6)res(6) = a(6) * b(0) + a(7) * b(3) + a(8) * b(6)res(1) = a(0) * b(1) + ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : CATIA V5 Makro Aufzeichnung
bgrittmann am 28.02.2011 um 20:12 Uhr (0)
ServusDie Anzahl der offenen Dokumente bekommst du über:Catia.documents.countOb es sinnvoll ist über einer Schleife alle offenen Dokument zu schließen kann man streiten.Das Problem bei aufgezeichneten Makros ist immer, dass alle Features/Parameter mit Namen angesprochen werden.Deshalb fällt dein Makro auf die "Nase", da deine Stange ja nicht "Part1" heißt (Pfad des Parameters).IMHO wäre die einfachste/sauberste Lösung: ein Produkt mit allen Einzelteilen aufbauen und diese "Vorlage" beim Start öffnen. Die G ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Auslesen der Koordinaten von Extrempunkten
V5Playaz am 07.12.2009 um 12:41 Uhr (0)
Die Objektauflösung hat bei mir auch nicht funktioniert.Aber die Suche hat funktioniert. Auch wenn die Performance bei weitreichenden Suchen schlecht ist, hauptsache es funktioniert.Zu deinem Code, versuche es mal mit:Code:iSel.Add CATIA.ActiveDocument.Part.HybridBodies.Item("Bemassung").HybridShapes.Item("Ankerpunkt_Annotation")Auf das Element/Item Result of Ankerpunkt_Annotation lässt sich nicht zugreifen.Das siehst du aber auch live, wenn du die Watchlist benutzt.Dort ist unter HybridShapes nur ein Elem ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Auslesen der Koordinaten von Extrempunkten
Starbirth am 07.12.2009 um 12:46 Uhr (0)
Also wie vermutet, es geht einfach nicht. Warum auch immer.Dann halt doch mittels Suche. Werd versuchen diese dann zumindest auf das Set zu beschränken. Dann sollte sie auch nicht all zu viele Ressourcen in Anspruch nehmen.Danke dir. So hab ich zumindest die Gewissheit dass es am Punkt liegt und nicht nur lokal an meinem Catia oder meiner Programmierung.EDIT: Rechtschreibung[Diese Nachricht wurde von Starbirth am 07. Dez. 2009 editiert.]
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Auslesen der Koordinaten von Extrempunkten
Starbirth am 27.11.2009 um 09:30 Uhr (0)
Hallo Forum.Im Anschluss an diesen Thread ergaben sich neue Probleme.Ich versuche nun die Koordinaten der (zur Erstellung der Annotation verwendeten) Punkte auszulesen.Da auf Extrema aber sowohl GetCoordinates (HybridShape) als auch GetPoint (SPA Workbench) fehlschlägt wollte ich nun den Punkt kopieren und als Datum wieder einfügen um dieses dann auszumessen.Der entsprechende Code sieht folgendermaßen aus:Code:Dim Coords(2)Dim iSel As SelectionSet iSel = CATIA.ActiveDocument.SelectioniSel.CleariSel.Add iPo ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Auslesen der Koordinaten von Extrempunkten
Starbirth am 07.12.2009 um 09:34 Uhr (0)
Hallo, ich mal wieder.Meine unbekannten Elemente bereiten mir immer noch Kopfzerbrechen.Ich versuche nun diese, nach dem Auslesen der Punktkoordinaten, wieder zu löschen.Ohne Erfolg, die verhalten sich nämlich ein wenig komisch.Zeichne ich das Löschen (was händisch mal wieder perfekt funktioniert) mit dem Makroeditor auf erhalte ich folgendes:Code:Dim partDocument1 As PartDocumentSet partDocument1 = CATIA.ActiveDocumentDim selection1 As SelectionSet selection1 = partDocument1.Selectionselection1.Search "Na ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Auslesen der Koordinaten von Extrempunkten
V5Playaz am 07.12.2009 um 11:10 Uhr (0)
Hallo,also ich seh da momentan kein Problem darin.Bei mir hat es so funktioniert: Code:Dim partDocument1 As PartDocument partDocument1 = CATIA.ActiveDocument Dim selection1 As Selection selection1 = partDocument1.Selection selection1.Search("Name=Result of Ankerpunkt_Annotation,all") selection1.Delete()grüße Dominik
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Auslesen der Koordinaten von Extrempunkten
Starbirth am 07.12.2009 um 12:19 Uhr (0)
Seltsam.Bekommst du ein ordentliches Ergebnis wenn du im Editor die Objektauflösung für das oben genannte Element einfügst?Sollte es so sein liegt das Problem wohl bei mir lokal vor.Mit deinem Code funktioniert es bei mir auch. Nur würde ich aus performancegründen gerne die Suche vermeiden.Hast du eine Idee wo das Problem in meiner Zeile"iSel.Add CATIA.ActiveDocument.Part.HybridBodies.Item("Bemassung").HybridShapes.Item("Result of Ankerpunkt_Annotation")"steckt? Die Fehlermeldung gibt an, dass die Methode ...
|
| In das Form CATIA V5 Programmierung wechseln |
