[Browning Zed]

Добрый день. Для получения значений атрибутов в блоке я использую подобную конструкцию кода:

Код:

[Выделить все]

 (mapcar 'vla-get-textstring
	(vlax-safearray->list
		(vlax-variant-value
			(vla-getAttributes
				(vlax-ename->vla-object
					(car (entsel))
				)
			)
		)
	)
)

Есть ли какой-то способ определить является ли полученное значение строки атрибута полем? Спасибо.

[Кулик Алексей aka kpblc]

Попробуй vla-FieldCode. Ну или вариант "поприкольнее":

Код:

[Выделить все]

 (if 
  (and (= (type (setq ent (vl-catch-all-apply (function (lambda () (car (entsel "\nSelect block with attributes : "))))))) 'ename) 
       (= (cdr (assoc 66 (entget ent))) 1)
  )
  (progn 
    (setq ent (vlax-ename->vla-object ent))
    (mapcar 
      (function 
        (lambda (att) 
          (vl-remove nil 
                     (list (vla-get-tagstring att) 
                           (vla-get-textstring att)
                           (if (vlax-method-applicable-p att 'fieldcode) 
                             (vla-fieldcode att)
                           )
                     )
          )
        )
      )
      (vlax-safearray->list (vlax-variant-value (vla-getAttributes ent)))
    )
  )
)

Код не проверял, написал "насухую"