Не работает API печати после выделения вручную области печати рамкой... Во всех версиях... Везде !

[maratovich]

Выделяем вручную область печати рамкой, нажимаем "применить к листу" или "Печать", после чего API сходит с ума и всегда печатает только ранее выбранную область.

Чё за ерунда ?

И как я упоминал ранее (но ответа не получил) исправляется Многостраничностью, но господа разработчики держат в тайне как добраться до этой команды, в итоге всем приходится говорить что нанокад "сырой" до ужаса.

Вот простейший пример:

 

Sub Example_GetWindowToPlot()
' Этот пример позволяет пользователю определять область в текущем
' листе, чтобы печатать и показыватm предварительный просмотр.
'
' * Примечание: Вы должны будете выйти из графического
' предварительного просмотра прежде, чем пример VBA остановится и
' управление будет возвращено

Dim point1 As Variant, point2 As Variant

' Получите первую точку в окне
point1 = ThisDrawing.Utility.GetPoint(, "Выберите левый нижний угол окна печати.")
ReDim Preserve point1(0 To 1)   ' Измените это на 2-ой массив, удаляя позицию Z

' Получите вторую точку в окне
point2 = ThisDrawing.Utility.GetPoint(, "Веберите правый верхний угл окна печати.")
ReDim Preserve point2(0 To 1)   ' Измените это на 2-ой массив, удаляя позицию Z

' Пошлите информацию об окне к текущему листу
ThisDrawing.ActiveLayout.SetWindowToPlot point1, point2

' Читайте обратную информацию окна
ThisDrawing.ActiveLayout.GetWindowToPlot point1, point2

MsgBox "Нажмите любую клавишу, чтобы печатать следующее окно:" & vbCrLf & vbCrLf & _
	   "Lower Left: " & point1(0) & ", " & point1(1) & vbCrLf & _
	   "Upper Right: " & point2(0) & ", " & point2(1)

' Удостоверьтесь, что команда должна печатать вид нужного стиля печати
ThisDrawing.ActiveLayout.PlotType = acWindow

' Пошлите Печать Окну
ThisDrawing.Plot.DisplayPlotPreview acFullPreview
End Sub

[ISL]

Дефект подтверждаем, действительно, если галочка "Многостраничность" выключена, при печати берётся окно печати, сохранённое в листе/модели. Записал в Клубе разработчиков дефект #244.

 

Галочку "Многостраничность", к сожалению, программно включить нельзя, записал пожелание #243.

[ISL]

Для исправления дефекта в nanoCAD 7.0 собран патч. Прикреплён к задаче #244 багтрекера Клуба разработчиков.