|
CATIA V5 Programmierung : Measurable
scheuche am 27.11.2002 um 13:07 Uhr (0)
Wer hat schon was mit Measurable gemacht und kann mir da weiter helfen? hier mein beispiel läuft nicht: Dim TheSPAWorkbench Dim TheMeasurable Dim referenceObject Dim coords(2) Dim selectedElement set selectedElement = selection.Item(i) set referenceObject = selectedElement.Reference Set TheSPAWorkbench = CATIA.ActiveDocument.GetWorkbench( SPAWorkbench ) Set TheMeasurable = TheSPAWorkbench.GetMeasurable(referenceObject) TheMeasurable.GetPoint(coords) msgBox Measured Point, x= & coords(0) & y ...
| | In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Den Pfad von nicht geladenem Part ablesen
scheuche am 14.04.2003 um 09:05 Uhr (0)
ich hatte die anforderung, die teile zu suchen, deren Files schon gelöscht wurden. Also brauchte ich erst mal den Pfad, und dann hab ich überprüft ob das Teil noch vorhanden ist. ich hab so den Pfad herausgefunden: produkt.Has.... if( NOT parentprod(i).HasAMasterShapeRepresentation) then ich hab herausgefunden wenn die shaperepresentation nicht mehr vorhanden ist, ist meist das teil kaputt oder vielmehr die die datenstruktur inkonsistent. diese produkte konnte ...
| | In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : von einem SelectElement zur Instanz im Product
scheuche am 27.01.2003 um 11:56 Uhr (0)
schau dir das mal an ist das das was du brauchst? ################################### Sub CATMain() Dim montab(0) montab(0)="Product" Dim document set document = CATIA.ActiveDocument Dim selection set selection = document.Selection Dim TheSPAWorkbench Dim TheMeasurable Dim referenceObject do call selection.clear() Dim str str=selection.SelectElement(montab,"Please select an object",true) if str = "Normal" then Dim count count = selection.Count Dim Reference Dim selectedElement Dim objet Dim i for i= ...
| | In das Form CATIA V5 Programmierung wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |