|
CATIA V5 Programmierung : körper kopieren und einfügen
snow am 12.03.2009 um 00:14 Uhr (0)
hallo cad-community ich will den hauptkörper kopieren und dessen (unverlinkte) kopie wieder einfügen.klappt soweit auch, bis darauf das der neue körper unter dem hauptkörper und nicht in dem dafür vorgsehenen körper (funzt - siehe bild) landet .Oder gibt es eine möglichkeit den erstellten neuen körper direkt in einem zug umzubenennen?---------kopierenDim UserSel As SelectionSet UserSel= CATIA.ActiveDocument.SelectionUserSel.ClearUserSel.Add Koerper2 ist der HauptkörperUserSel.Copy UserSel.Clear--------- ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : körper kopieren und einfügen
tomtom1972 am 12.03.2009 um 07:11 Uhr (0)
Hallo,wenn du einen Body kopierst wird dieser immer im Part eingefügt werden und nicht in einem anderen Body.Wenn du hingegen den Inhalt eines Bodies kopierts, kann du diesen in einen anderen Body einfügen.Natürlich kannst du den neu eingefügten Body umbenennen.Grundsätzlich: es gibt nur eine Selection, d.h. ein Dim reicht aus.Zum umbenennen kannst du entwerder den sich noch in der Selektion befindenden Body selbst verwenden, oder den neu eingefügten im Part aufrufen und umbenennen. Bsp.: Product mit 2 Par ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter im Parameterset
zoltan.bekesi am 12.03.2009 um 17:52 Uhr (0)
Hallo, oProduct ist der Instanz, oRefDocument ist die "Originale". Wenn du in der V5Automation.chm die Objektstruktur durchliest, oder einfach in der VBA-Editor ein Watch auf CATIA.ActiveDocument legst, kannst du sehr schön die Hierarchie sehen. In CATIA hat jedes PartDocument (CATPart) ein Part und ein Product, sowie jedes ProductDocument ein Product und ein Products. Von oben nach unten, also von ActiveDocument ausgegangen, kommst Du in die erste Ebene über CATIA.ActiveDocument.Product.Products.Item(x) V ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Parameter im Parameterset
ogard1 am 06.03.2009 um 17:31 Uhr (0)
Hallo,versuch es hiermit, hier werden alle Parameter in einer Box ausgegeben.Sub CATMain()Dim oActiveDoc As Document Set oActiveDoc = CATIA.ActiveDocument Dim oParameters As Parameters Set oParameters = oActiveDoc.Part.Parameters Dim ostrPar As String For i = 1 to oParameters.Count ostrPar = ostrPar & vbCrLf & oParameters.Item(i).Name Next MsgBox ostrPar End Sub Gruß
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Spiegeln von Components
tberger am 12.03.2009 um 15:36 Uhr (0)
Nun ja, es ist vieles nicht im Rekorder 1:1 abgebildet, dazu gibt es auch schon viele Beitraege.Wenn du ein Makro schreiben willst, darfst du dich nicht nur auf den Rekorder "verlassen", sonst bist du es auch.Schau doch mal nach, was du unter Transformationsmatrix etc. findest, die kann man sich naemlich ausgeben lassen zu jeder Instanz und die dann "manipulieren".Gruesse aus dem RheinlandThomas------------------CATIA - eine Laune der Natur ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Suchen von Variablen
Heiko83 am 12.03.2009 um 15:18 Uhr (0)
Hallo zusammen,ich beschäftige mich seit ein paar Wochen mit VBA Programmierung unter Catia V5R16.Ich möchte den Inhalt einer ListBox suchen. Dazu Habe ich folgenden Code geschrieben:Sub Suche()Dim nameDim AutoSel As SelectionDim AutoSel2 As SelectionFor i = 0 To Me.ListBox2.ListCount - 1 Step 1 name = Me.ListBox2.List(i) Set AutoSel = CATIA.ActiveDocument.Selection AutoSel.Clear AutoSel.Search (".Fläche.Name=name,Alle") AutoSel.copy CATIA.ActiveWindow.ActivateNext Set AutoSel2 = CATI ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Ansichten über Benutzeroberfläche
nikibert am 12.03.2009 um 16:53 Uhr (0)
hab selber eine Lösung gefunden:Function View(A) Get the viewer Set oViewer = CATIA.ActiveWindow.ActiveViewer Get the viewpoint Set oViewpoint = oViewer.Viewpoint3DIf A = "TopView" ThenX = 0Y = 0Z = -1U = 0V = 1W = 0End IfIf A = "RightView" ThenX = 0Y = -1Z = 0U = 0V = 0W = 1End If Change the viewpointoViewpoint.PutOrigin Array(0, 0, 0)oViewpoint.PutSightDirection Array(X, Y, Z)oViewpoint.PutUpDirection Array(U, V, W)oViewpoint.ProjectionMode = catProjectionCylindric Update the vieweroViewer.ReframeoView ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Suchen von Variablen
MICHLICK am 12.03.2009 um 16:55 Uhr (0)
Hallo Heiko,mir wird ja ganz komisch zumute wenn ich Deinen Code lese.Ich glaube Du befindest Dich da auf dem Holzweg.Du kannst einen Parameter wie folgt finden:Code:Function FindDimension(oPart As Part, ParamName As String) As Dimension Dim oParam As Parameters Set oParam = oPart.Parameters On Error Resume Next Set FindDimension = oParam.Item(ParamName) If Err.Number 0 Then MsgBox "Parameter konnte nicht gefunden werden!", vbCritical, "Fehler bei Parametersuche" Err.Clear On Error Goto 0 E ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Messung auf NoShow setzen über Makro
Hezarfen am 12.03.2009 um 17:06 Uhr (0)
Hallo liebe CAD.de community,ich habe folgendes Problem, ich muss ein Makro entwickeln, das mir bestimmte Messungen im Part auf NoShow schaltet. Dabei sollte idealerweise eine Maske am Anfang erscheinen, wo ich Schlagwörter eingeben kann und das Makro mir dann alle Messungen, die das Schlagwort im Namen beinhaltet auf NoShow schaltet (und alle anderen auf Show).Mein bisheriger Makroprogram sieht wie folgend aus, dabei habe ich als zur Probe nur "Messelement" als Schlagwort eingegeben: --------------------- ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catia API -> Drawing
michse02 am 12.03.2009 um 17:17 Uhr (0)
Hallo,ich habe heute mit der Nutzung der Catia API angefangen. Dabei verwende ich ein vb.net Programm. Dazu folgende Fragen:1) Ich muss in einer Drawing Rechteckige Kästchen malen. Dazu habe ich übers Factory2D Element Linien erstellt und passend gelegt. a) Gibts ne bessere Möglichkeit über vorgefertigte Rechtecke?b) Kann man die Liniendicke beeinflussen? Wenn ja, wie?2) In besagter Drawing muss ich Textblöcke einfügen. (Hab ich über View-Texts gemacht)a) Da gibt es die Funktion setFontSize(iFirst as Int, ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Länge einer 2D-Linie im Drawing
zoltan.bekesi am 12.03.2009 um 18:24 Uhr (0)
Hallo Heiko,anbei eine Lösung. Es gilt nur für die selber gezeichneten Linien, Drawing geöffnet, auf aktueller Blatt und in der aktuellen Ansicht:Code:Sub test() Dim oActDoc As DrawingDocument Set oActDoc = CATIA.ActiveDocument Dim oSheet As DrawingSheet Set oSheet = oActDoc.Sheets.ActiveSheet Dim oSel As Selection Set oSel = oActDoc.Selection Dim DrwViews As DrawingViews Set DrwViews = oSheet.Views Dim oView As DrawingView Set oView = DrwViews.ActiveView Dim oGeometricElements As GeometricEleme ...
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catia API -> Drawing
michse02 am 13.03.2009 um 16:20 Uhr (0)
Vielen Dank, das hat mir sehr geholfen!Grußmichse02
|
| In das Form CATIA V5 Programmierung wechseln |
|
CATIA V5 Programmierung : Catia API -> Drawing
zoltan.bekesi am 12.03.2009 um 18:42 Uhr (0)
Hallo michse02,suche in deine CATIA Installationsverzeichnis nach der Datei V5Automation.chm.Da wirst Du die Antwort auf einige deiner Fragen bekommen.Aber kurz die Antworte auf einige deiner Fragen:1/a) Leider kann man kein Rechteck erzeugen. Wie wäre es mit einen Detail?1/b) Elemente ins Selection aufnehmen, VisPropertySet der Selection ansprechen2/a) siehe in der Hilfe, oder Forumsuche verwenden: http://ww3.cad.de/foren/ubb/Forum137/HTML/001111.shtml#0000012/b) siehe SetFontName in der Hilfe / Forumsuch ...
|
| In das Form CATIA V5 Programmierung wechseln |
