Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  CATIA V5 Programmierung
  Problem mit Formel

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
Autor Thema:  Problem mit Formel (425 mal gelesen)
Augustiner
Mitglied
Konstrukteur


Sehen Sie sich das Profil von Augustiner an!   Senden Sie eine Private Message an Augustiner  Schreiben Sie einen Gästebucheintrag für Augustiner

Beiträge: 188
Registriert: 02.12.2005

HP Workstation
Windows XP Professional
Visual Studio 2005 Professional
CATIA V5 R14SP5 & R17SP3

erstellt am: 16. Mrz. 2006 08:48    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Guten morgen zusammen

Edit: Problem habe ich gerade gelöst!!!Hatte den Constraint falsch angesprochen.

hab mal wieder ein kleines Problem.Möchte ein Offset im Sketch über Parameter steuern.Bekomme aber immer die Meldung Typen unverträglich.
Hab schon einiges durchprobiert komm aber irdendwie nicht weiter, vielleicht könnte mir jemand weiterhelfen

Gruß Andi


Sub CATMain()

set sel=CATIA.ActiveDocument.Selection

Dim sFilter(0)
sFilter(0) = "Part"
sel.SelectElement SFilter, "Part selektieren", false

set part1 = sel.Item(1).Value

Dim Params As Parameters

Set Params = part1.Parameters
Dim Spannmarke as Dimension

Set Spannmarke=Params.CreateDimension("Spannmarke", "Length", 25)

Set documents1 = CATIA.Documents

Set partDocument1 = documents1.Item("Adapterpart 03.CATPart")

Set part1 = partDocument1.Part

Set bodies1 = part1.Bodies

Set body1 = bodies1.Item("Spannmarke")

Set sketches1 = body1.Sketches

Set sketch1 = sketches1.Item("Sketch.1")

Set constraints1 = sketch1.Constraints

Set constraint1 = constraints1.Item("Offset.4")

Dim Rels As Relations
Set Rels = Part1.Relations

Dim Formel As Formula
Set Formel1 = Rels.CreateFormula("Formel1", "Test", constraints1.Item("Offset.4") , "Spannmarke")

End Sub

[Diese Nachricht wurde von Augustiner am 16. Mrz. 2006 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2023 CAD.de | Impressum | Datenschutz