| | |
 | 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: Listing Window schließen (1580 mal gelesen)
|
Mat000
Mitglied
   Beiträge: 11
Registriert: 18.09.2008 NX 5.0.6
VB .net (Visual Studio 2005 Version 8.0.50727.42)
|
erstellt am: 25. Sep. 2008 08:41  <-- editieren / zitieren -->   Unities abgeben:          
NX 5.0.4.1 VB .net (Visual Studio 2005 Version 8.0.50727.42) ------------------ Hallo, lässt sich ein Listing Window, das man zur Ausgabe geöffnet hat, per Befehl wieder schließen? Mit dem close()-Befehl erreiche ich das nicht (schaltet offensichtlich nur die Ausgabe aus). Code:
Dim theSession As Session
theSession = Session.GetSession
Dim lw As ListingWindow
lw = theSession.ListingWindow
lw.Open()
lw.WriteLine("Hallo Welt.")
lw.Close() ' schließt das Fenster nicht
lw.WriteLine("Dieser Text wird nicht mehr angezeigt.")
------------------
Gruß, Mat Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
älg
Mitglied
CADmin
Beiträge: 403
Registriert: 17.06.2003
|
erstellt am: 25. Sep. 2008 09:22 <-- editieren / zitieren --> Unities abgeben: Nur für Mat000 
|
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: 25. Sep. 2008 09:57 <-- editieren / zitieren --> Unities abgeben: Nur für Mat000
|
Mat000
Mitglied
Beiträge: 11
Registriert: 18.09.2008 NX 5.0.6
VB .net (Visual Studio 2005 Version 8.0.50727.42)
|
erstellt am: 25. Sep. 2008 10:06 <-- editieren / zitieren --> Unities abgeben:
|
| | Vertriebsmitarbeiter (m/w/d) Innendienst für Kroatien / Serbien / Slowenien | Mit mehr als 4.500 Mitarbeiterinnen und Mitarbeitern sowie einem Jahresumsatz von 1,659 Milliarden Euro sind wir als größter Hersteller von Einbauküchen der Marktführer in Deutschland und haben eine führende Stellung in Europa. Unsere Werke im ostwestfälischen Verl sowie unser Werk im saarländischen Saarlouis zählen europaweit zu den modernsten und leistungsfähigsten Produktionsstätten für Küchenmöbel.... | | Anzeige ansehen | Feste Anstellung |
|
Overcast
Mitglied
Beiträge: 111
Registriert: 21.12.2005 .
|
erstellt am: 26. Sep. 2008 12:48 <-- editieren / zitieren --> Unities abgeben: Nur für Mat000
Es gibt ab NX6 nun 2 "Close" Funktionen: Close() - Closes the stream to the listing window.
CloseWindow() - Closes the listing window actually from the UI.
Code:
Option Strict Off
Imports System
Imports NXOpen
Imports NXOpen.UFModule NXJournal
Sub Main Dim s As Session = Session.GetSession()
Dim ufs As UFSession = UFSession.GetUFSession()
Dim lw As ListingWindow = s.ListingWindow lw.Open()
lw.WriteLine("Hallo1") ' closes the window like the F4 key does
'lw.CloseWindow ' closes the window like File->Exit
UFSession.GetUFSession.Ui.ExitListingWindow() lw.Open()
lw.WriteLine("Hallo2") End Sub
End Module
Allerdings bleibt der Inhalt im Informationsfenster mit
CloseWindow() erhalten, was somit der F4 Taste entspricht. Mit der UF-Variante von Michael wird auch der Inhalt geleert.
UFSession.GetUFSession.Ui.ExitListingWindow() Mach am besten mal einen Call beim Support auf, um die ListingWindow Klasse entsprechend zu erweitern. Gruss,
Frank.
[Diese Nachricht wurde von Overcast am 26. Sep. 2008 editiert.]
[Diese Nachricht wurde von Overcast am 26. Sep. 2008 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de
| 
geht's mit :
