Hot News:

Unser Angebot:

  Foren auf CAD.de (alle Foren)
  Inventor VBA
  Eigenschaftsfelder via API ändern

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
  
Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte
Autor Thema:  Eigenschaftsfelder via API ändern (684 mal gelesen)
ChristianS
Mitglied
Leiter Kundenbetreuung


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

Beiträge: 635
Registriert: 27.09.2000

erstellt am: 11. Nov. 2004 09:24    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

Hi Gemeinde,

ich möchte in bestehenden Zeichnungen via APIProgrammier- und Anwendungsschnittstelle (Application Programming Interface) ein Eigenschaftsfeld auslesen, bzw. dessen Zuordnung verändern.
Auf die titleblockdefinitions bin ich schon gekommen, jedoch finde ich den Punkt nicht, wie ich an die Eigenschaftsfelder komme.
sind das vielleicht die 'Textboxes' im Sketch ?

Der Ablauf den ich erstellen will sieht in etwas so aus :
1.) Zeichnung öffnen
2.) Eigenschaftsfelder in den Schriftfeldern durchsuchen und herausfinden, welche auf Modelleigenschaften gemappt sind
3.) Mapping auf Zeichnungseigenschaften ändern

Hat jemand soetwas schon gemacht, bzw. eine Idee wo ich weiter suchen muß um den Schlüssel zu finden ?

Gruß
Christian

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

PaulSchuepbach
Moderator
Programmierer




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

Beiträge: 1005
Registriert: 01.10.2003

erstellt am: 11. Nov. 2004 09:43    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 Nur für ChristianS 10 Unities + Antwort hilfreich

Hallo Christian,

Du kannst folgendes machen:

Private Sub chkProperties()
 
  Dim oApp As Inventor.Application
  Set oApp = ThisApplication
 
  Dim oDoc As DrawingDocument
  Set oDoc = oApp.ActiveDocument

  For i = 1 To oDoc.TitleBlockDefinitions(1).Sketch.TextBoxes.Count
 
    Debug.Print oDoc.TitleBlockDefinitions(1).Sketch.TextBoxes(i).FormattedText
 
  Next i

End Sub


Schau Dir die Ausgabe im Ausgabefenster an - Du findest die Zuordnung der Property nach 'Property Document='.

Das Auseinandernehmen der Strings ist nur noch 'ne Fleissaufgabe...


Hoffe, das Hilft.


Gruesse,

Paul

www.morecam.ch/cad.htm

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

ChristianS
Mitglied
Leiter Kundenbetreuung


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

Beiträge: 635
Registriert: 27.09.2000

erstellt am: 11. Nov. 2004 11:32    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

Hi Paul,

danke, genau das wars.
Ich habe immer nach 'nem eigenen Objekt dafür gesucht.

Danke,
Gruß
Christian

10U4U

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

ChristianS
Mitglied
Leiter Kundenbetreuung


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

Beiträge: 635
Registriert: 27.09.2000

erstellt am: 11. Nov. 2004 15:25    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

Hi,

hast du vielleicht noch eine Idee wie ich an den dargestellten Wert komme ?

Im ersten Schritt habe ich nun das entsprechende Textfeld gefunden und gegen ein anderes ausgetauscht.
Das klappt auch sehr gut.

Jetzt will ich noch den Wert der da mal drin stand, z.B. CrNi.... irgentwas' in ein eigenes iPropertie schreiben. Das schreiben und soweite funktioniert auch bereits, jedoch suche ich nun noch die Stelle wo ich den Wert finde, der im Schriftfeld dargestellt wird.

Das original iPropertie im Modell kann ich nicht auswerten, da mir nur die Zeichnungen zur Verfügung stehen.

Gruß
Christian

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