| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für NX |
| | |
 | Anwender CAD mit Siemens NX-Basis , ein Kurs (bis zu 100% förderbar mit Bildungsgutschein)
|
|
Autor
|
Thema: JPG mittels VB einfügen (855 mal gelesen)
|
hg-obdf Mitglied Konstrukteur

 Beiträge: 78 Registriert: 30.07.2008 NX7.5 Visual Basic 2010 Express Eclipse
|
erstellt am: 14. Sep. 2009 13:25 <-- editieren / zitieren --> Unities abgeben:         
Hallo- habe ein Journal aufgezeichnet, wo ein Bild (jpg) auf eine 2D Zeichnungsableitung eingefügt wird. Dim displayPart As Part = theSession.Parts.Display ' ---------------------------------------------- ' Menü: Einfügen->Image... ' ---------------------------------------------- ' ---------------------------------------------- ' Menü: Werkzeuge->Journal->Stopp ' ---------------------------------------------- End Sub End Module Leider bringt mich das nicht wirklich weiter. Hat jemand eine Idee, oder funktioniert das mit VB nicht? mFG Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
mseufert Moderator Freiberuflicher CAD/CAM Ingenieur
      
 Beiträge: 2736 Registriert: 18.10.2005 HP Z420 WIN7 64 Win 10 UG NX6-2306 3D Printer Prusa MK2 S
|
erstellt am: 14. Sep. 2009 17:07 <-- editieren / zitieren --> Unities abgeben:          Nur für hg-obdf
|

| | Bauingenieur (m/w/d) | | Wir sind ein etabliertes Ingenieurbüro mit Sitz bei Überlingen am Bodensee. Als Familienunternehmen zeichnen wir uns durch kurze Entscheidungswege, ein wertschätzendes Miteinander und persönliche Entwicklungsmöglichkeiten aus. Unser Team entwickelt innovative Lösungen und begleitet Projekte von der Planung bis zur Umsetzung in den Bereichen Holzbau, Stahlbau und Massivbau für den privaten und gewerblichen Wohnbau, Kommunale Bauten und den Gewerbebau.... | | Anzeige ansehen | Feste Anstellung |
|
hg-obdf Mitglied Konstrukteur

 Beiträge: 78 Registriert: 30.07.2008 NX7.5 Visual Basic 2010 Express Eclipse
|
erstellt am: 24. Sep. 2009 12:32 <-- editieren / zitieren --> Unities abgeben:         
Fürs Forum- wenns jemand braucht.... Dim curDwg As NXOpen.Tag = NXOpen.Tag.Null Dim pnt() As Double = {1, 20, 0} 'Position auf der Zeichnung ufs.Drf.CreateImageFromFile("Pfad", curDwg, pnt, NXOpen.Tag.Null) MFG Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |