|
CATIA V5 Programmierung : Wie Objekte aus Join entnehmen?
davischr am 07.01.2011 um 12:04 Uhr (0)
Hallo Zusammen,Ich muss diesen Beitrag noch einmal auffrischen, da ich genau dasselbe machen möchte.Aufgabe: Ich wähle durch SelectElement2(...) ein Objekt (in diesem Fall ein Join) aus. Dieser enthält z.B. Einen Sketch und Linien. Ich möchte nun den Filter für die nächsten Selections so setzen, dass nur noch Elemente vom Typ der Elemente die im Join enthalten sind ausgeählt werden können.Das Problem das ich nun habe, wenn ich sObject(1) (ist das ausgewählte Objekt ein Join) die Anzahl Elemente ausgeben wi ...
|
|
CATIA V5 Programmierung : Wie Objekte aus Join entnehmen?
bgrittmann am 07.01.2011 um 12:12 Uhr (0)
ServusVersuch es mal mit:sobject(1).item(1)value.GetElementsSizeBeim sObject(1) handelt es sich doch um die Selektion allgemein? Mit Item bekommst du das erste Element und Value liefert das Object zurück (hier den Join)GrußBernd------------------Warum einfach, wenn es auch kompliziert geht.
|
|
CATIA V5 Programmierung : Fehlerhafte Publications
bgrittmann am 18.01.2011 um 06:16 Uhr (0)
ServusUps, da hab ich mich wohl verschaut.Versuch es mal mit:Code:Set pubreference1 = Selection1.item(1).referenceoder über: createreferencefromobject (siehe Doku oder Forensuche)GrußBernd------------------Warum einfach, wenn es auch kompliziert geht.
|
|
CATIA V5 Programmierung : Aus dem Drawing heraus Parameter im Product abfragen
bgrittmann am 18.01.2011 um 12:07 Uhr (0)
ServusDas Document bekommst du ja über "DrawingViewGenerativeBehavior":Dann kannst den Parameter über:Code:set oParameter = ProductDocument.Product.Parameters.item("Parameter_Textfeld")MsgBox(oParameter.value)Ansprechen/ausgebenGrußBernd------------------Warum einfach, wenn es auch kompliziert geht.
|
|
CATIA V5 Programmierung : Mit VBScript in Excel schreiben
bgrittmann am 25.01.2011 um 18:04 Uhr (0)
ServusFehlt da nicht die Angabe des Workbook? zBCode:Set oWorkbook = Excel.Workbooks.Open "C:Test.xls"oWorkbook.sheets.item("Ergebniswerte").Range("A1").Value=ZminusGrußBernd------------------Warum einfach, wenn es auch kompliziert geht.
|
|
CATIA V5 Programmierung : Mit VBScript in Excel schreiben
Eule am 27.01.2011 um 14:16 Uhr (0)
Hallo Bernd,nach dem Einfügen der Klammern funktioniert der open Befehl, aberdas ursprüngliche Problem ist geblieben. Ich kann nichts nach Excelschreiben, weil das Script mit der Meldung "unbekannter Laufzeitfehler"jetzt bei der Zeile oWorkbook.sheets.item("Ergebniswerte")... abbricht.Gruß,Eule
|
|
CATIA V5 Programmierung : in Catia Makro Range für Excel definieren
bgrittmann am 04.02.2011 um 12:42 Uhr (0)
ServusDu solltest sauber die Objekte Deklarieren und Instanzieren. Also zB (ungetestet) auch das WorkSheet:Code:Dim oWorkSheet as WorksheetSet oWorksheet = oAWBook.Sheets.item(1)oWorksheet.Range("A1:B4").Select...Wundern mich sowieso dass dein Makro läuft. Wenn du Zellen direkt über die Anwendung ansprichst (objXL.Cells(m, "a")) und nicht über die Mappe. (siehe auch Anleitungen auf www.online-excel.de)GrußBernd------------------Warum einfach, wenn es auch kompliziert geht.
|
|
CATIA V5 Programmierung : Überprüfungsmakro
bgrittmann am 11.03.2011 um 11:00 Uhr (0)
ServusVerwende einfach bodies.item statt bodies.getitem.Code:Sub CATMain() Dim partDocument1 As PartDocument Set partDocument1 = CATIA.ActiveDocument Dim part1 As Part Set part1 = partDocument1.Part Dim Bodies1 As Bodies Set Bodies1 = part1.Bodies on error resume next Dim Palaem1 As Body Set Palaem1 = part1.Bodies.Item("UDF_Scheibe.1") If err.Number 0 Then MsgBox ("Test funktioniert") Else MsgBox ("Palaem vorhanden") End If on error goto 0 End SubGrußBernd---------- ...
|
|
CATIA V5 Programmierung : vba - Text in CATDrawingsTextfeld einfügen
bgrittmann am 08.04.2011 um 11:26 Uhr (0)
ServusIMHO musst du das Blatt und die Ansicht angeben wo der Text sind. Dann kannst du über Item auf das Textfeld greifen. zB:Dim Benennung As DrawingTextSet Benennung = CATIA.ActiveDocument.sheets.item(1).views.item(2).texts.item("Text.177")Benennung.Text = txtben1.TextOder über eine Selektion das Textfeld suchen:Dim drawingDocument1 As DrawingDocumentSet drawingDocument1 = CATIA.ActiveDocumentDim selection1 As SelectionSet selection1 = drawingDocument1.Selectionselection1.Search "(Name=Text.177 & CATDrwS ...
|
|
CATIA V5 Programmierung : vba - Text in CATDrawingsTextfeld einfügen
bgrittmann am 08.04.2011 um 11:40 Uhr (0)
ServusAFAIR ist Views.item(1) immer der Vordergrund und Views.item(2) der Hintergrund."Normale" Ansichten sind dann item(3) und folgendeGrußBernd------------------Warum einfach, wenn es auch kompliziert geht.
|
 |
CATIA V5 Programmierung : Problem beim Umbenennen von Instance Names
tobiley am 11.04.2011 um 21:46 Uhr (0)
Hallo ich habe ein Programm mit VB.NET geschrieben welches eine komplette Baugruppe umbenennt also z.B. die Teilenummer bei allen Bauteilen ändert. Den Instance-Namen nenne ich auch mittels eines CATScripts wie von tomtom1972 beschrieben um. Das Problem ist das CATIA die einzelnen Dateien zum speichern komplett lädt und so der benötigte Arbeitsspeicher bei großen Baugruppen immer größer wird bis dieser vollläuft. Um das zuverhindern lade ich jedes Bauteil nach dem Speichervorgang in den Visualization_Mode. ...
|
|
CATIA V5 Programmierung : Auswahl von Show elemente
ukyokatajama am 06.05.2011 um 12:16 Uhr (0)
Hi,ich versuche mir gerade ein Makro zu schreiben, bei dem im ersten Schritt nur ganz bestimmte eingeblendete Elemente aus einem bestimmten Set aus dem Strukturbaum selektiert werden sollen. In diesem Fall Edges. Aktuell werden die edges ausgewählt allerdings auch die NoShow-Edges. Da ich sehr wenig Erfahrung mit VB bzw. Catscript habe denke ich liegt es an der von mir verwendeten Syntax. Wo könnte der Feheler Liegen?----------------------------------------------Sub CATMain()Set Document = CATIA.ActiveDocu ...
|
|
CATIA V5 Programmierung : Rekursive Schleife zur Produktdurchsuchung nach Punkten
Kne am 20.05.2011 um 17:13 Uhr (0)
Hallo,auf die schnelle aus dem Kopf geht das so, wirst aber bestimmt noch was dran basteln müssen:Catia Documente einlesendim documents1 as documentsset documents1 = catia.documentsDocumente zählendim anzahlAnzahl = documents.countIdentification der Partsfor i = 0 to Anzahl If TypeName(documents1.item(i + 1)) = "partdocument" then Partname = documents1.item(i + 1).name oder so ähnlich/einfach das Part ansteuern Set partdocument1 = catia.documents.item(partname) Deine Code zum auslesen der Punkte en ...
|
