|
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 : 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 : SelectElement unter Unix
Macro_Man am 14.07.2006 um 09:49 Uhr (0)
Hallo Lusilnie, vielen Dank für deine Hilfe . Leider ist das Problem, dass der Code in der Reaktion sein soll, denn damit stelle ich sicher, dass es auch unter UNIX funktioniert. SelecltElement/2/3 wird von UNIX nicht unterstützt. Ich suche eine Lösung des Problems ohne SelectElement.Mir würde es auch weiterhelfen wenn ich eine Möglichkeit hätte das Macro anzuhalten um eine Kante zu selektieren. Dann könnte ich mittels .selection die angeklickte Kante einer Referenz zuweisen. MfG
| | In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Mittelpunkte finden
Macro_Man am 24.08.2007 um 10:04 Uhr (1)
Hallo zusammen,hier noch ein Vorschlag um Kreiskanten zu erkennen. Zuerst alle Edges in ein Array schreiben, anschließend deren Radius und die Länge auslesen und prüfen ob die Länge der Kante gleich dem Umfang des Kreises ist. Ist diese Bedingung erfüllt handelt es sich um einen Kreis. Abschließend die entsprechenden Referenzen in ein neues Array schreiben. So erhälst du alle Referenzen von den Kanten die einen vollständigen Kreis beschreiben.CODE:For i = 1 To KantenAnzahl Set EdgesArray(i) = selection.It ...
| | In das Form CATIA V5 Programmierung wechseln |
|
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 |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
