Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Showing results for
Show only
|
Search instead for
Did you mean:
This page has been translated for your convenience with an automatic translation service. This is not an official translation and may contain errors and inaccurate translations. Autodesk does not warrant, either expressly or implied, the accuracy, reliability or completeness of the information translated by the machine translation service and will not be liable for damages or losses caused by the trust placed in the translation service.Translate
I am trying to determine the current margins. So far I have the following but I am not sure how to fill in the ???
Dim xx As Extents2d
Dim oPlotSettings As PlotSettings
Dim oPlotSettingsValidator As PlotSettingsValidator = PlotSettingsValidator.Current
Dim oPlotConfig As PlottingServices.PlotConfig = PlottingServices.PlotConfigManager.CurrentConfig
Dim oPlotInfo As PlottingServices.PlotInfo = New PlottingServices.PlotInfo()
Dim oLayoutManager As LayoutManager = LayoutManager.Current
Dim oLayout As Layout = oLayoutManager.GetLayoutId(oLayoutManager.CurrentLayout).GetObject(OpenMode.ForRead, False, False)
{code}
Dim CLayout As Layout
Dim Margins As Extents2d, Paper As Geometry.Point2d
With LayoutManager.Current
CLayout = .GetLayoutId(.CurrentLayout).GetObject(OpenMode.ForRead, False, False)
End With
Margins = CLayout.PlotPaperMargins
Paper = CLayout.PlotPaperSize
{code}