[Leo_fmf]

Для этой цели есть хорошая функция _burst.
Но почему то он не работает в моем макросе на LISP,
пробовал писать
(command "burst")
(command "_burst")
но ничего не работает, может я что-то делаю не так?

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

Offtop: Крайний оффтоп, дальше на это отвечать будет уже не комильфо
Это ж RegEx, в wcmatch другие законы "ACAD 2009,ACAD 201[02-5]"

[VVA]

Сообщение от Krieger Он ведь предоставил код: Код: (command "burst")

Сообщение от Krieger Фигня в том, что функции command и vl-cmdf не понимают самописных команд, коим и является команда burst идущая в отдельной поставке от када в Express tools. Соответсвенно вопрос - как в лисп запустить самописные команды?

Самописная команда - это специфическая функция, имеющая префикс C: и не имеющая аргументов. Но от этого она не перестает быть функцией, и вызывать ее надо как функцию

Код:

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

(C:BURST)

Команда: (C:BURST) Выберите объекты: найдено: 1 Выберите объекты:

[Krieger]

Ну вот, а то развели тут...

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

Повторюсь:

Сообщение от Кулик Алексей aka kpblc Потому что есть помимо просто (command "burst") вариантов масса.

[Leo_fmf]

Спасибо большое за код

Сообщение от Кулик Алексей aka kpblc (vl-load-com) (vla-sendcommand (vla-get-activedocument (vlax-get-acad-object)) "burst ") (while (/= (getvar "cmdactive") 0) (command pause) ) ;_ end of while

Все нормально работает.

[Krieger]

Сообщение от Leo_fmf Спасибо большое за код Все нормально работает.

Алексей стебается, sendcommand не совсем для этого, просто напиши (C:BURST).

[Leo_fmf]

Сообщение от Krieger Алексей стебается, sendcommand не совсем для этого, просто напиши (C:BURST).

Спасибо, Krieger, так мне не намного спокойнее))
Да и вообще спасибо за то что разъяснил всем суть моего вопроса, а то я ушел на объект и не мог отвечать.