|
CATIA V5 Programmierung : SelectElement unter Unix
Macro_Man am 13.07.2006 um 20:19 Uhr (0)
Hallo Experten,ich habe folgendes Problem, ein Macro soll unter Unix und Windows verwendet werden. In diesem Macro(CATScript) wird einem vorhandenen Punkt (Typ: CircleCenter) durch einen Benutzer eine Referenz(Type:BRep Edge)zugewiesen.Wird das Macro manuel gestartet funktioniert es super. Set partDocument1 = CATIA.ActiveDocumentSet part1 = partDocument1.PartSet hybridShapeFactory1 = part1.HybridShapeFactoryDim ref(0)ref(0)= "Edge"Dim UserSelection,UserSelSet UserSelection= CATIA.ActiveDocumentSet UserSel= ...
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Do Until Schleife, Ausgans-Prüfkriterium
Macro_Man am 18.07.2006 um 09:51 Uhr (0)
Hallo zusammen, folgendes Problem, ich möchte eine Do Until Schleife programmieren, die nach einer Selction überprüft ob die Selection vom Typ "Body ist.Sub CATMain()Dim Ref(0)Ref(0)= "AnyObject"DoDim UserSel As SelectionSet UserSel=CATIA.ActiveDocument.SelectionUserSel.clearDim E As CATBSTRE = UserSel.SelectElement2(Ref,"TEST",true)MsgBox(UserSel.Item(1).Value.Name)UserSel.EndSelectElementUserSel.ClearLoop Until (E = "Body")End SubSo funktioniert es nicht, die Ausgangsbedingung wird nicht erkannt und die ...
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Do Until Schleife, Ausgans-Prüfkriterium
Macro_Man am 18.07.2006 um 11:18 Uhr (0)
Ich habe das Problem selber lösen können, zwar mit einem kleinem Umweg aber es geht als CATScript. Ich habe einfach eine neue Variable zum überprüfen der Bedingung definiert.Sub CATMain()Dim Ref(0)Ref(0)= "AnyObject"DoDim UserSel As SelectionSet UserSel=CATIA.ActiveDocument.SelectionUserSel.clearDim E,A As CATBSTRE = UserSel.SelectElement2(Ref,"TEST",true)Msgbox (typename(UserSel.Item(1).Value)A = typename(UserSel.Item(1).Value)UserSel.EndSelectElementUserSel.ClearLoop Until (A="Body")End Sub
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Selektion Window
Macro_Man am 18.07.2006 um 14:03 Uhr (0)
Hi,folgendes Macro habe ich geschriebenSub CATMain()Window///////////////////////////////////// selection Loop /////////////////////////////////////////////////////////////Dim Ref1(0)Ref1(0)= "AnyObject" Do Dim E1,A As CATBSTR Dim UserSel1 As Selection Set UserSel1=CATIA.ActiveDocument.Selection UserSel1.clear E1 = UserSel1.SelectElement2(Ref1,"Select Body",true) A = typename(UserSel1.Item(1).Value) Msgbox typename(UserSel1.Item(1).Value) Lo ...
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Flächenintegration ohne vereifachte Geometrie
Macro_Man am 12.08.2007 um 19:41 Uhr (0)
Hallo,ich möchte für eine FEM Berechnung mehrere Teilflächen automatisch durch ein Skript auf eine Berandungsfläche eines Solids aufbringen. Dafür benutze ich das Element SewSurface(Fläche integrieren)Code:part1.InWorkObject = BerechnungsmodellSet reference1 = part1.CreateReferenceFromObject(Flaeche)Set SewSurface = ShapeFactory.AddNewSewSurface(reference1,catPositiveSide)Leider vereinfacht CATIA immer die Geometrie und ich erhalte keine Teilfläche sondern die gesamte Berandungsfläche als Ergebnis.Wenn ich ...
| In das Form CATIA V5 Programmierung wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |