ADN Club > AutoLisp / VisualLISP и DCL

цвет объектной привязки

(1/2) > >>

altver:
добрый день
Как лиспом изменить цвет объектной привязки?
заранее благодарен!

Александр Ривилис:
altver,
Что подразумевается под "цветом объектной привязки"? Давай в виде картинке, на которой отмечено, что именно должно поменять цвет.

altver:
Чтобы все "снэпы" были желтые например, как на картинке

Александр Ривилис:
Попробуй так:

--- Код - Auto/Visual Lisp [Выбрать] ---(setenv "Model AutoSnap Color" "65535")(setenv "Model 3d AutoSnap Color" "65535")"65535" - это для желтого цвета. Если нужен другой цвет, то через команду _OPTIONS настраиваешь цвета, а при помощи

--- Код - Auto/Visual Lisp [Выбрать] ---(setq color1 (getenv "Model AutoSnap Color"))(setq color2 (getenv "Model 3d AutoSnap Color"))получаешь строки для нужного тебе цвета.

Александр Ривилис:
Названия, которые следует применять можно посмотреть здесь:

--- Код: ---HKEY_CURRENT_USER\Software\Autodesk\AutoCAD\RXX.X\ACAD-XXXX:XXX\FixedProfile\Editor Configuration
--- Конец кода ---
Где X зависит от версии и языка AutoCAD:

--- Код: ---
"Model AutoSnap Color"=dword:00007fff
"Layout AutoSnap Color"=dword:0001cc01
"Parallel AutoSnap Color"=dword:0000ffff
"Perspective AutoSnap Color"=dword:00019801
"BEdit AutoSnap Color"=dword:0001cc01
"Model 3d AutoSnap Color"=dword:0000ffff
"Layout 3d AutoSnap Color"=dword:00ff7f00
"Parallel 3d AutoSnap Color"=dword:0000ffff
"Perspective 3d AutoSnap Color"=dword:00ff7f00
"BEdit 3d AutoSnap Color"=dword:00ff7f00
--- Конец кода ---

Навигация

[0] Главная страница сообщений

[#] Следующая страница

Перейти к полной версии