ask Drafting Border ( Siemens Digital Industries Software/NX Programmierung)

Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für NX

Autor

Thema: ask Drafting Border (624 mal gelesen)

little_ug
Mitglied
CAX/PDM Admin / PM

Senden Sie eine Private Message an little_ug

Schreiben Sie einen Gästebucheintrag für little_ug

Beiträge: 389
Registriert: 20.03.2003

erstellt am: 18. Feb. 2009 12:29

Editieren oder löschen Sie diesen Beitrag!

<-- editieren / zitieren -->

Unities abgeben:

Hallo kennt einer von euch eine Möglichkeit über vb-journal abzufragen ob unter Preferences-Drafting Display borders eingestellt ist?
Ich habe nur mit vb gefunden dass man es hiermit setzten kann:

wp.Preferences.Drafting.DisplayBorders = False

Danke!

------------------
Gruß

Michael

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

Jan Boettcher
Mitglied

Senden Sie eine Private Message an Jan Boettcher

Schreiben Sie einen Gästebucheintrag für Jan Boettcher

Beiträge: 183
Registriert: 22.06.2005

NX 7.5 - NX 2007
SolidWorks 2006 - 2021
Win 10

erstellt am: 18. Feb. 2009 14:05

<-- editieren / zitieren -->

Unities abgeben:

Nur für little_ug

Hallo Michael,

Vielleicht stehe ich ja ein bisschen auf dem Schlauch, aber das sollte es doch tun:

Code:

if wp.Preferences.Drafting.DisplayBorders then
Session.getSession().ListingWindow.WriteLine("Grenzen sind alle an")
else
Session.getSession().ListingWindow.WriteLine("Grenzen sind alle aus")
end if

Oder meinst Du den Zustand im Voreinstellungsdialog?

Gruß
Jan

------------------
Ingenieurbüro Jan Böttcher
www.ib-boettcher.de

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

little_ug
Mitglied
CAX/PDM Admin / PM

Beiträge: 389
Registriert: 20.03.2003

erstellt am: 18. Feb. 2009 14:34

<-- editieren / zitieren -->

Unities abgeben:

Hallo Jan,

genau ich mein den Zustand der Voreinstellung

------------------
Gruß

Michael

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

Jan Boettcher
Mitglied

Beiträge: 183
Registriert: 22.06.2005

NX 7.5 - NX 2007
SolidWorks 2006 - 2021
Win 10

erstellt am: 18. Feb. 2009 16:04

<-- editieren / zitieren -->

Unities abgeben:

Nur für little_ug

Hallo Michael,

Das müsste dann über den Optionsmanager der Session gehen:

Code:
Session.getSession().OptionsManager.GetIntValue("Drafting_borderDisplay")

Ich habs aber nicht ausprobiert.

Gruß
Jan

------------------
Ingenieurbüro Jan Böttcher
www.ib-boettcher.de

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

little_ug
Mitglied
CAX/PDM Admin / PM

Beiträge: 389
Registriert: 20.03.2003

erstellt am: 19. Feb. 2009 04:36

<-- editieren / zitieren -->

Unities abgeben:

Super, Vielen Dank hat funktioniert

------------------
Gruß

Michael

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

Dipl. Ing. / Bachelor / Master (m/w/d) - Fachrichtung Architektur oder Bauingenieurwesen, Schwerpunkt Hochbau -
Die Stadtverwaltung Rheine gehört mit ca. 800 Mitarbeitenden zu den größten Arbeitgebern in Rheine. Wir verstehen uns als moderner Dienstleister und sichern die Lebensqualität von ca. 80.000 Einwohnern und Einwohnerinnen in einer lebens- und liebenswerten Stadt! Die Stadt Rheine sucht zum nächstmöglichen Zeitpunkt eine/n: Dipl. Ing./Bachelor/Master (m/w/d) - ...
*Anzeige ansehen*	Architektur

Overcast
Mitglied

Senden Sie eine Private Message an Overcast

Schreiben Sie einen Gästebucheintrag für Overcast

Beiträge: 111
Registriert: 21.12.2005

erstellt am: 19. Feb. 2009 13:40

<-- editieren / zitieren -->

Unities abgeben:

Nur für little_ug

Zitat:

Session.getSession().OptionsManager.GetIntValue("Drafting_borderDisplay")

Vorsicht, dies fragt den Customer Default ab, aber nicht die aktuelle Einstellung unter
"Preferences->Drafting->View->Display Borders" !!!

Aber Jan hatte ja schon mit "wp.Preferences.Drafting.DisplayBorders" die Lösung gegeben ;)

Code:

Option Strict Off
Imports System
Imports NXOpen
Module NXJournal
Sub Main
Dim theSession As Session = Session.GetSession()
Dim theUI As UI = UI.GetUI()
Dim lw As ListingWindow = theSession.ListingWindow
lw.Open()
lw.WriteLine("Drafting_borderDisplay Default = " & theSession.OptionsManager.GetIntValue("Drafting_borderDisplay"))
lw.WriteLine("Drafting_borderDisplay Preference = " & theSession.Parts.Work.Preferences.Drafting.DisplayBorders)
End Sub
End Module

[Diese Nachricht wurde von Overcast am 19. Feb. 2009 editiert.]

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

Anzeige.:
X

Anzeige: (Infos zum Werbeplatz >>)