| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| PNY WIRD VON NVIDIA ZUM HÄNDLER DES JAHRES GEWÄHLT, eine Pressemitteilung
|
Autor
|
Thema: Seitenausrichtung des Papierbereichs abfragen (vb.net) (1531 mal gelesen)
|
deHolzschneider Mitglied
Beiträge: 14 Registriert: 07.01.2011 ACA 2011, 64bit
|
erstellt am: 16. Feb. 2011 21:06 <-- editieren / zitieren --> Unities abgeben:
Hallo zusammen, ich habe schon diverse Suchmaschinen bemüht, bin aber einfach nicht weitergekommen mit meinem Problem, das wie folgt lautet: Wie kann ich die Seitenausrichtung des Papierbereichs abfragen unter VB.net? Ich kann alle möglichen Papierwerte abfragen, vom Druckbereich bis hin zur Seitengröße, lediglich mit der Ausrichtung (also Hoch- oder Querformat) klappt es nicht. Hat hierfür irgendjemand einen Tipp? Schonmal Danke! deHolzschneider Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Ex-Mitglied
|
erstellt am: 16. Feb. 2011 21:14 <-- editieren / zitieren -->
Hi, hilft Dir das Schnippsel (ergänzend zu >>>hier<<<)?
Code: tPSV.SetPlotRotation(myLayout, PlotRotation.Degrees000)
Wenn nicht, zeig Deinen Bereich, indem Du die anderen Settings festlegst und ich versuche in Deinem Schnippsel fortzusetzen. - alfred - ------------------ www.hollaus.at |
deHolzschneider Mitglied
Beiträge: 14 Registriert: 07.01.2011 ACA 2011, 64bit
|
erstellt am: 16. Feb. 2011 22:39 <-- editieren / zitieren --> Unities abgeben:
Hi, ich will die Orientierung ja nicht setzten, sondern nur abfragen. Bisher bin ich soweit gekommen:
Code:
Dim doc As Document = Application.DocumentManager.MdiActiveDocument Dim db As Database = doc.Database Dim tr As Transaction = db.TransactionManager.StartTransaction Try Using tr Dim acLayoutMgr As LayoutManager = LayoutManager.Current Dim lay As Layout = tr.GetObject(acLayoutMgr.GetLayoutId(acLayoutMgr.CurrentLayout), OpenMode.ForRead) Dim Rotation As PaperOrientationStates = lay.PaperOrientation 'Hier bekomme ich immer "not applicable" (oder 2) zurück. 'Normalerweise sollte ich 0 oder 1 (True/False) erhalten, was für die Ausrichtung steht, wenn ich's richtig verstanden habe
Bin ich hier auf dem richtigen Weg???
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Ex-Mitglied
|
erstellt am: 16. Feb. 2011 22:50 <-- editieren / zitieren -->
Hi, aber das sollte doch funktionieren, oder?
Code: Dim Rotation As PlotRotation = lay.PlotRotation
- alfred - ------------------ www.hollaus.at |
deHolzschneider Mitglied
Beiträge: 14 Registriert: 07.01.2011 ACA 2011, 64bit
|
erstellt am: 17. Feb. 2011 19:21 <-- editieren / zitieren --> Unities abgeben:
|