dwg.ru forum rss xml
| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны |  Справка по форуму |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > .NET > Revit API начертить линии и текст в Sheet(VB.net или С#)

Revit API начертить линии и текст в Sheet(VB.net или С#)

Версия для печати
 
Ответ
Опции темы Поиск в этой теме
Непрочитано 13.02.2017, 15:19 #1
Revit API начертить линии и текст в Sheet(VB.net или С#)
DEM
 
YngIngKllr
 
СПб
Регистрация: 29.03.2005
Сообщений: 12,632

DEM вне форума Вставить имя

В модели чертить линии в принципе довольно просто, создаем линии и потом создаем скейтч план.
А вот как на листе начертить линии никак не могу найти, может кто втречал пример на VB.net или С#.
__________________
Шаг 12й......
Мои публикации
Просмотров: 1520
 
Непрочитано 13.02.2017, 15:49
#2
h5r32


 
Регистрация: 28.12.2011
СПб
Сообщений: 379


line1 = Line.CreateBound(base_point, XYZ(0, -15 * f_m, 0))
doc.Create.NewDetailCurve(view, line1)

Таким макаром вроде чертятся где угодно, хоть в модели хоть на листе
h5r32 вне форума вставить имя Обратить внимание модератора на это сообщение  
 
Автор темы   Непрочитано 13.02.2017, 16:10
#3
DEM

YngIngKllr
 
Регистрация: 29.03.2005
СПб
Сообщений: 12,632


Выдают ошибку
Код:
[Выделить все]
 Dim vs As ViewSheet
        vs = ViewSheet.Create(doc, ElementId.InvalidElementId)
        Dim pts As New List(Of XYZ)(5)
        pts.Add(New XYZ(0.0, 0.0, 0.0))
        pts.Add(New XYZ(0.0, 10.0, 0.0))
        Dim baseCurve As Line = Line.CreateBound(pts(0), pts(1))
        doc.Create.NewDetailCurve(vs, baseCurve)
И такой
Код:
[Выделить все]
 Dim vs As ViewSheet
        vs = ViewSheet.Create(doc, ElementId.InvalidElementId)
        Dim pts As New List(Of XYZ)(5)
        pts.Add(New XYZ(0.0, 0.0, 0.0))
        pts.Add(New XYZ(0.0, 10.0, 0.0))
        Dim baseCurve As Line = Line.CreateBound(pts(0), pts(1))
        doc.Create.NewDetailCurve(doc.ActiveView, baseCurve)
Оборачивал в трансзакцию и тоже выдает ошибку....

----- добавлено через ~17 ч. -----
Работает
Код:
[Выделить все]
Dim trans As Transaction = New Transaction(doc)
        trans.Start("Lab")
        Dim view As View
        view = doc.ActiveView
        Dim pts As New List(Of XYZ)(5)
        pts.Add(New XYZ(0.0, 0.0, 0.0))
        pts.Add(New XYZ(0.0, 10.0, 0.0))
        Dim baseCurve As Line = Line.CreateBound(pts(0), pts(1))
        doc.Create.NewDetailCurve(view, baseCurve)
        trans.Commit()
__________________
Шаг 12й......
Мои публикации
DEM вне форума вставить имя Обратить внимание модератора на это сообщение  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > .NET > Revit API начертить линии и текст в Sheet(VB.net или С#)

Инженерные консультации
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Последовательность экспорта из Revit Structure в SCAD Арсентьев Евгений SCAD 67 31.03.2017 16:05
Как сделать текст и линии с окантовкой? Denis112 AutoCAD 8 14.02.2013 17:16
Текст размерноу линии zaqwer AutoCAD 1 04.02.2010 11:55
Взорвать текст, сделать тип линии konstruktor AutoCAD 13 31.05.2009 13:38
подскажите как программно начертить линии разных типов Александер Программирование 4 30.06.2005 07:17

|| Главная || Каталог САПР || Тендеры || Публикации || Объявления || Биржа труда || Download || Галерея ||
|| Библиотека || Кунсткамера || Каталог предприятий || Контакты || Файлообменник || Блоги ||


Размещение рекламы