|
CATIA V5 Programmierung : Referenzkreis ändern
GeorgK am 25.06.2008 um 17:01 Uhr (0)
Hallo Daniel,bei mir läuft das Makro unter V5R16 SP5 HF77 nicht. Habe mir jetzt so geholfen:Sub CATMain()Dim oDoc As DocumentDim oSel As SelectionSet oDoc = CATIA.ActiveDocumentSet oSel = oDoc.SelectionDim FontSize As DoubleoSel.Search "Drafting.Balloon;all"i = 1For i = 1 To oSel.CountSet OBallon = oSel.Item(i).Value If OBallon.FrameType catNone Then OBallon.FrameType = catNone End If OBallon.Leaders.Item(1).HeadSymbol = catFilledCircle NextoSel.ClearDim selection1 As SelectionSet Selection = oDoc. ...
| | In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Referenzkreis ändern
GeorgK am 23.06.2008 um 11:15 Uhr (0)
Hallo,wie kann ich alle Referenzkreise in einer Zeichnung so umstellen, dass die Umrahmung des Textes ohne Kreis ist? Von Hand: rechte Maustaste auf Referenzkreis = Eigenschaften = Register Text = UmrahmungDie Auswahl der Referenzkreise funktioniert soLanguage="VBSCRIPT"Sub CATMain()Dim drawingDocument1 As DocumentSet drawingDocument1 = CATIA.ActiveDocumentReferenzkreis ändernDim VisProperties1 As VisPropertySetDim selection1 As SelectionSet selection1 = drawingDocument1.Selectionselection1.Search "Draftin ...
| | In das Form CATIA V5 Programmierung wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |