| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > VBA програмный доступ к параметрам динамического блока (чтение/установка)

VBA програмный доступ к параметрам динамического блока (чтение/установка)

Ответ
Поиск в этой теме
Непрочитано 07.02.2011, 12:16 #1
VBA програмный доступ к параметрам динамического блока (чтение/установка)
sergtranes
 
проектирование "чистых комнат"
 
Хайфа
Регистрация: 07.02.2011
Сообщений: 51

Уважаемые профи,

есть ли програмный доступ к параметрам динамического блока (чтение/установка) аналогично атрибутам блока?

буду вам очень благодарен
Просмотров: 3061
 
Непрочитано 07.02.2011, 12:47
#2
Сергей Богатов


 
Регистрация: 21.02.2009
Сообщений: 825


Есть. Смотри помощь - там всё написано
__________________
Я-проектировщик бывший проектировщик!
Сергей Богатов вне форума  
 
Автор темы   Непрочитано 07.02.2011, 15:32
#3
sergtranes

проектирование "чистых комнат"
 
Регистрация: 07.02.2011
Хайфа
Сообщений: 51


AutoCAD MEP2008
пытался делать поиск DynamicBlock , GetDynamicBlockPropertyList - ничего не нашел
возможно что VBA игнориррует динамические блоки ?!
видел здесь много LISPov, но это не помогает!
sergtranes вне форума  
 
Непрочитано 07.02.2011, 16:27
#4
Сергей Богатов


 
Регистрация: 21.02.2009
Сообщений: 825


Код:
[Выделить все]
   Dim blockObj As AcadBlockReference
   Dim insPnt(2) As Double
   Dim dynProps() As AcadDynamicBlockReferenceProperty   
Dim blkName As String
    ThisDrawing.ActiveSpace = acModelSpace
    ' vid
    insPnt(0) = countR * 40 + 90
    insPnt(1) = 55
    insPnt(2) = 0
    
    Set blockObj = ThisDrawing.ModelSpace.InsertBlock(insPnt, "Êàáåëü", 1#, 1#, 1#, 0)
    dynProps = blockObj.GetDynamicBlockProperties    
    For I = LBound(dynProps) To UBound(dynProps)
        If dynProps(I).PropertyName = "Âèä" Then
            dynProps(I).Value = viD
        End If
    
    Next I
    blockObj.Update
См.красное. Но это для обычного Автокада
__________________
Я-проектировщик бывший проектировщик!
Сергей Богатов вне форума  
 
Автор темы   Непрочитано 07.02.2011, 16:57
#5
sergtranes

проектирование "чистых комнат"
 
Регистрация: 07.02.2011
Хайфа
Сообщений: 51


dynProps = blockObj.GetDynamicBlockProperties
я так и думал, но мой VBA не поддерживает этот метод!
sergtranes вне форума  
 
Непрочитано 07.02.2011, 16:59
#6
Сергей Богатов


 
Регистрация: 21.02.2009
Сообщений: 825


смотри объектную модель, может в MEP как то по-другому?
__________________
Я-проектировщик бывший проектировщик!
Сергей Богатов вне форума  
 
Автор темы   Непрочитано 07.02.2011, 17:16
#7
sergtranes

проектирование "чистых комнат"
 
Регистрация: 07.02.2011
Хайфа
Сообщений: 51


спасибо спасибо есть - видимо раньше я что-то не так делал!
еще раз спасибо!
sergtranes вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > VBA програмный доступ к параметрам динамического блока (чтение/установка)

Размещение рекламы
Опции темы Поиск в этой теме
Поиск в этой теме:

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
кто знает есть ли доступ к параметрам динамичесого блока из Lisp GaD200900 LISP 15 07.08.2016 18:36
Странное поведение динамического блока высотной отметки hwd Динамические блоки 12 08.09.2011 11:15
Определение координат динамического блока в среде VBA ArtemYa Программирование 8 03.12.2009 13:57
Как получить доступ к вложенным блокам из VBA? vicont-s Программирование 3 25.04.2009 23:29
Измнение через ексель (через макрос в VBA) аттрибутов динамического блока VitaminC Программирование 4 20.10.2007 14:52