[gizmo_zx]

Добрый день.
Вопросик по Lisp.
Есть программа на VBA (выбор блоко в по имени/тегу/значению атрибутов), ее результат именованый набор, который подхватывается lisp и оставляет их выделенными для последующих операций.
Надо что-то вроде:

Код:

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

 
(defun c:find_block_by_()
  (command "vbarun" "find_block_by_")
  (command "selset-gripset")
  (princ)
)

Но как дождаться завершения команды (command "vbarun" "find_block_by_"), а уже после этого выполнять (command "selset-gripset") ?

[hwd]

Сообщение от gizmo_zx как дождаться завершения команды (command "vbarun" "find_block_by_"), а уже после этого выполнять (command "selset-gripset") ?

Никак, насколько мне известно, т.к.командная строка автокада работает в асинхронном режиме.

[AlexV]

Я для аналогичной задачи (когда сформирован набор с именем "_grips_light") использую в коде VBA вот этакую паллиативщину:

Код:

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

   strtmp1 = "(progn(defun ss-gripset (/ SS SR SSN I)(vl-load-com)(setq SS(vla-get-selectionsets(vla-get-activedocument (vlax-get-acad-object))) SSN(vla-item SS ""_grips_light"") SR(ssadd))(vlax-for I SSN (ssadd(vlax-vla-object->ename I)SR))(sssetfirst nil SR)(princ))(ss-gripset))\n" & " "
   ThisDrawing.SendCommand strtmp1

[hwd]

Сообщение от AlexV Я для аналогичной задачи (когда сформирован набор с именем "_grips_light") использую в коде VBA вот этакую паллиативщину: Код: [Выделить все] strtmp1 = "(progn(defun ss-gripset (/ SS SR SSN I)(vl-load-com)(setq SS(vla-get-selectionsets(vla-get-activedocument (vlax-get-acad-object))) SSN(vla-item SS ""_grips_light"") SR(ssadd))(vlax-for I SSN (ssadd(vlax-vla-object->ename I)SR))(sssetfirst nil SR)(princ))(ss-gripset))\n" & " " ThisDrawing.SendCommand strtmp1

И тем не менее SendCommand так же работает в асинхронном режиме.

[Nike]

А чисто на LISP аналогичная фигня не нужна?
Выбор блоков по значению атрибутов.

[gizmo_zx]

Огромное спасибо AlexV. Задачу решил твоим способом.

[AlexV]

Сообщение от hwd И тем не менее SendCommand так же работает в асинхронном режиме.

Да, но это не имеет значения, т.к. выполняется непосредственно из VBA кода "в нужный момент", после создания набора.