|
CATIA V5 Programmierung : XMl Elementtext nimt Texte der Kindelemente auf
DanielFr. am 29.03.2010 um 05:48 Uhr (0)
Hallo,hast du erstens mal eine Beispiel *.xml Datei und zweitens den Code bzw. den Codeabschnitt. Scheint ein Programmierfehler zu sein bei mir geht´s wunderbar über die DOM------------------MFG DanielSysteminformation | Inoffizielle CATIA Hilfeseite | CATIA FAQ | Suche | TraceParts (Normteile...) | 3D Content Central (noch mehr Normteile...)
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : XMl Elementtext nimt Texte der Kindelemente auf
DanielFr. am 29.03.2010 um 10:46 Uhr (0)
Hallo ,Code:Dim ZSB As IXMLDOMElementSet ZSB = xml.firstChildDim Knotenliste As IXMLDOMNodeListSet Knotenliste = ZSB.childNodesDim Knoten0 As IXMLDOMNodeDim Knoten1 As IXMLDOMNodeDim Knoten2 As IXMLDOMNodeDim Kind0 As NodeDim Text0 As NodeDim Kind1 As NodeDim Text1 As NodeDim Kind2 As NodeDim Text2 As NodeTreeview füllen:For Each Knoten0 In Knotenliste Set Kind0 = TreeView1.Nodes.Add(, , , Knoten0.baseName) 1.Ebene For Each Knoten1 In Knoten0.childNodes Set Kind1 = TreeView1.Nodes.Add(Kind0, t ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : XMl Elementtext nimt Texte der Kindelemente auf
DanielFr. am 29.03.2010 um 11:50 Uhr (0)
Hallo, Zitat:Manche Elemente besitzen keine Unterelemente, dafür aber einen Text. Und diesen muss ich mit dieser Zeile ausgeben. Diese Elemente können aber durch das Makro wiederum Unterelemente bekommen. Deshalb kann ich die Schleife nicht prüfen lassen, ob Unterelemente vorhanden sind und falls ja - Text nicht ausgebenDas verstehe ich nicht. Du kannst doch beim ändern der *.xml ein Ereignis auslösen das dir deinen TreeView neu aufbaut. Dann kannst du die Abfrage doch machen . Wie sieht denn dein Ablauf a ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : innerhalb CATPart in CATProduct arbeiten
DanielFr. am 29.03.2010 um 14:00 Uhr (0)
Hallo ,das geht nicht. Das aktive Dokument ist IMMER das Produkt egal ob nun das Part aktive ist oder nicht. Du musst dich über die Products-Collection zu deinem Part durchhangeln und dieses dann auf die entsprechende Variable legen.------------------MFG DanielSysteminformation | Inoffizielle CATIA Hilfeseite | CATIA FAQ | Suche | TraceParts (Normteile...) | 3D Content Central (noch mehr Normteile...)
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : innerhalb CATPart in CATProduct arbeiten
DanielFr. am 29.03.2010 um 14:52 Uhr (0)
Hallo ,Code:Sub CATMain()****Deklarationen**** Dim intDocObj As Document Dim intWindowsObj As Windows Dim intObjTypeStr As String Dim intSelObj As Object Selection Dim intSelFilter(0) Dim intSelStateStr As String Dim intPartDocObj As Part Dim intBodiesObj As Bodies Dim intNewBodyObj As Body****Abfrage Dokumente**** Set intWindowsObj = CATIA.Windows If intWindowsObj.Count = 0 Then MsgBox "Es ist kein Dokument geladen!" + Chr(10) + "Das Makro kann nicht ausgeführt werden und wird beendet!", vbC ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Zugriff auf ein Schnittfenster im DMU-Navigator
DanielFr. am 29.03.2010 um 15:49 Uhr (0)
Hallo ,ich denke nicht das du da rankommst . In der Windows-Collection wird das Schnittfenster nicht aufgeführt und sonst gibt´s nichts. "CatSecWindowOpenMode" wird laut CAA Hilfe nur von "SectioningSettingAtt" genutzt. Diesen Controller brauchst du aber NUR für die Einstellungen. ------------------MFG DanielSysteminformation | Inoffizielle CATIA Hilfeseite | CATIA FAQ | Suche | TraceParts (Normteile...) | 3D Content Central (noch mehr Normteile...)
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Schriftfeld ausfüllen
DanielFr. am 31.03.2010 um 11:07 Uhr (0)
Hallo,die Frage für mich klint so: Zitat:Hallo, ich habe ein Auto, keine Ahnung welches und ich habe ein Problem das ich nicht kenne.Bitte um Hilfe Wie sieht das Skript aus? Wenn du das Online stellst dann kann dir vielleicht jemand helfen ------------------MFG DanielSysteminformation | Inoffizielle CATIA Hilfeseite | CATIA FAQ | Suche | TraceParts (Normteile...) | 3D Content Central (noch mehr Normteile...)
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Funktionsumfang CATVBA
DanielFr. am 31.03.2010 um 14:41 Uhr (0)
Hallo,du kannst ALLE Funktionen verwenden die dort aufgeführt sind. Das Problem ist hierbei nicht die Funktion selber sondern die Deklaration der Variable. Es gibt Funktionen deren Objekte nicht als native CATIA Datentypen deklariert werden dürfen. Suche hierzu z.B. mal nach "SelectElement" im Board.In deinem Fall deklariere mal das "EngineMoveObject" als Objekt und nicht als nativen CATIA Datentyp. Du wirst sehen es geht. Nachteil an der Sache ist die IntelliSense (Autovervollständigung fällt bei solchen ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Schriftfeld ausfüllen
DanielFr. am 31.03.2010 um 12:59 Uhr (0)
Hallo,also das ganze spielt sich in diesem Bereich ab:Code:vTXT = Left(oName, InStrRev(oName, ".CAT") - 1)Name_1 = Mid(vTXT, InStrRev(vTXT, "_") + 9) Right Left MidNamex = Left(oName, InStrRev(oName, ".CAT") - 1)Name_2 = Left(Namex, InStrRev(Namex, "_") + 7) Right Left MidNamey = Mid(vTXT, InStrRev(vTXT, "_") + 6) Right Left MidName_3 = Left(Namey, Len(Namey) - 14) Right LeftMidLeider sind die Variablennamen "Name_1", "Name_2" usw. nicht aussagekräftig. Du musst jetzt schauen in welcher Variable deine Posi ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Schriftfeld ausfüllen
DanielFr. am 31.03.2010 um 14:37 Uhr (0)
Hallo,JA sicher geht das.Code:Sub CATMAin() Dim intDrawingDocObj As DrawingDocument Dim intScaleFirstViewStr As Double Set intDrawingDocObj = CATIA.ActiveDocument intScaleFirstViewStr = intDrawingDocObj.Sheets.ActiveSheet.Views.Item(3).Scale MsgBox "Masstab der ersten Ansicht: " & intScaleFirstViewStrEnd SubDer Masstab kommt als Double Typ raus. D.h. bei einem Wert von "0,5" ist dein Maßstab 1:2. Willst du das so haben musst du dir noch eine Funktion schreiben die eine Double Variable in e ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Zugriff auf ein Schnittfenster im DMU-Navigator
DanielFr. am 01.04.2010 um 18:57 Uhr (0)
Hallo,wenn du aus VBA raus gehst und mit VB.NET programmierst dann könntest du den Prozess überwachen. Hier gibt es eine Methode .WaitForInputIdle (im Namespace System.Diagnostics). Diese Methode wartet so lange bis die Applikation bereit ist User Inputs zu empfangen. Vielleicht funktioniert so etwas (ist nur eine Vermutung ------------------MFG DanielSysteminformation | Inoffizielle CATIA Hilfeseite | CATIA FAQ | Suche | TraceParts (Normteile...) | 3D Content Central (noch mehr Normteile...)
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Funktionsumfang CATVBA
DanielFr. am 03.04.2010 um 18:53 Uhr (0)
Hallo ,ähm wo genau steht das du es in einem CATvba nicht verwenden kannst? Habe gerade mal geschaut und nichts dergleichen gefunden [EDIT]Hier nochmal der Code den ich zum Testen verwendet habe. Der Code bewegt das erste Produkt (Part) im Root-Produkt um die angegebenen Werte:Code:Sub CATMain() Dim intDocObj As ProductDocument Dim intProdObj As Product Dim intMoveObj As Object Move Dim intTransArray(11) Set intDocObj = CATIA.ActiveDocument Set intProdObj = intDocObj.Product.Products.Item(1) Set ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : 2D-Zeichnung - Maße in Klammern setzen
DanielFr. am 06.04.2010 um 12:07 Uhr (0)
Hallo John,ändere mal die fett markierte Zeile in deinem Code Code:Sub CATMain()Dim drawingDocument1 As DrawingDocumentSet drawingDocument1 = CATIA.ActiveDocumentSet oSelection = CATIA.ActiveDocument.SelectionDim InputObjectType(0)InputObjectType(0) = "AnyObject"Status = oSelection.SelectElement2(InputObjectType, "Wählen Sie die Bemaßung aus", False)If (Status "Normal") Then MsgBox "Abbruch" Exit SubElseSet dimension1 = oSelection.Item(1).ValueSet DrawingDimValue1 = dimension1.GetValueDrawingDimValue1. ...
|
| In das Form CATIA V5 Programmierung wechseln |
