Как поменять цвет перекрестия в автокаде

Цвета перекрестия (курсора) где хранятся? (хочу менять программным способом)

Хочу менять программным способом цвет курсора (перекрестия), в зависимости от ситуации и режима работы. Но не нашел, где хранятся (в какой системной переменной) значения его цветов (для пространства модели и пространства листа).
Для его размеров нашёл системную переменную CURSORSIZE, а вот для цветов — нет .
Искал в справке, искал «тупо в лоб» прямым просмотром системных переменных AutoCAD, но всё без толку.
Если кто знает, подскажите, пожалуйста.

P.S. Как «врукопашную» менять знаю: Сервис —> Настройка —> Экран —> Цвета.

Просмотров: 13930
Регистрация: 29.10.2004
Сообщений: 16,333

системных переменных нет.
следует открыть настройки-экран-цвет и там выбрать перекрестье в одном из пространств

Регистрация: 29.05.2004
Сообщений: 1,187
Изменить цвет курсора
Поиском не пользовался?
__________________
Kiev, Ukraine
Регистрация: 05.10.2008
Сообщений: 13

sasha_lif
Пользовался, но неудачно, попадались темы, где обсуждалось как сменить врукопашную или кому какие цвета курсора, фона и т.п. нравятся.
За ссылку большое спасибо, выручили.

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

Не знаю, как другие, но я неоднократно ошибался при черчении – думая, что нахожусь в пространстве Листа, часто незаметно для самого себя попадал через Видовые экраны в пространство Модели (всего-то достаточно нечаянно сделать двойной клик левой кнопкой мышки в области Видового экрана). Оно, конечно, ACAD сигнализирует об этом событии сменой значка ПСК (в левом нижнем углу экрана), в области режимов [Лист] переключает на [Модель], но в большинстве случаев все эти «сигналы» остаются незамеченными и создаваемые примитивы оказываются «в действительности не там, где должны быть на самом деле» (т.е. не в Листе, а в Модели). Когда Видовой экран весь виден в рабочей области экрана, то «обрезание» перекрестия до границ этого Видового экрана «напоминает» о том, что «залетел» в пространство Модели (я работаю со 100% размерами перекрестия), но когда границы Видового экрана находятся за пределами рабочего поля экрана, то это не спасает, т.к. перекрестие занимает в этом случае всё рабочее поле.

Поэтому я предлагаю в качестве дополнительного «сигнала» об изменение пространства использовать цвет перекрестия . Для этого надо назначить разные цвета перекрестия для пространства Модели и для пространства Листа (например в Модели пусть будет зелёный, а в Листе – жёлтый: Сервис – Настройка – Экран — Цвета) и использовать Лисп-программку, которая будет отслеживать, где находится перекрестие и при необходимости менять его цвет. Программка меняет цвет перекрестия при событиях перехода «Лист – Видовой экран» и «Видовой экран – Лист» (при событиях перехода «Лист – Модель» и «Модель – Лист» цвет курсора меняет сам ACAD). Для отслеживания событий используется «реактор», отслеживающий изменение системных переменных ACAD. Значения цветов перекрестия для Листа и для Модели программка запоминает при инициализации (загрузке) и в дальнейшем использует эти значения, не отслеживая их возможные изменения со стороны пользователя (Сервис – Настройка – Экран – Цвета). Если пользователь изменил цвета перекрестия, то он должен заново загрузить программку (или просто вызвать nc_crosshair-color-init). Мне, честно говоря, лениво было напрягать «моск» для динамического отслеживания цветов во время сеанса редактирования чертежа, поскольку один раз выбрав цвета перекрестия, я уже не меняю их в дальнейшем. Код может и не оптимальный (надеюсь без особых ошибок), но работает. Может ещё кому-нибудь пригодиться.

(vl-load-com) (setq NC_ACAD_APP (vlax-get-acad-object)) ;процедура запоминает цвета перекрестия в пространстве Модели и в пространстве Листа в глобальных переменных (defun nc_crosshair-color-init () (setq NC_CROSSHAIR-COLOR-MODEL (vla-get-modelcrosshaircolor (vla-get-display (vla-get-preferences NC_ACAD_APP))) NC_CROSSHAIR-COLOR-LAYOUT (vla-get-layoutcrosshaircolor (vla-get-display (vla-get-preferences NC_ACAD_APP))) NC_CROSSHAIR-COLOR-LAYOUT-IS-CHANGE nil ) (princ) ) ;процедура назначает цвет перекрестия в зависимости от того. где оказались в видовом экране или на листе (defun nc_crosshair-color-set () (if (and (/= NC_CROSSHAIR-COLOR-MODEL NC_CROSSHAIR-COLOR-LAYOUT) (nc_is-layout)) (progn (if (nc_is-vport) (if (not NC_CROSSHAIR-COLOR-LAYOUT-IS-CHANGE) (progn (vla-put-layoutcrosshaircolor (vla-get-display (vla-get-preferences NC_ACAD_APP)) NC_CROSSHAIR-COLOR-MODEL) (setq NC_CROSSHAIR-COLOR-LAYOUT-IS-CHANGE T) )) (if NC_CROSSHAIR-COLOR-LAYOUT-IS-CHANGE (progn (vla-put-layoutcrosshaircolor (vla-get-display (vla-get-preferences NC_ACAD_APP)) NC_CROSSHAIR-COLOR-LAYOUT) (setq NC_CROSSHAIR-COLOR-LAYOUT-IS-CHANGE nil) )) ) )) (princ) ) ;функция возвращает T если находимся в пространстве листа, иначе - nil (defun nc_is-layout () (= (getvar "TILEMODE") 0)) ;функция возвращает T если находимся в видовом экране, иначе - nil (defun nc_is-vport () (and (nc_is-layout) (/= (caar (vports)) 1))) ;процедура вызывеается реактором при изменении системной переменной (defun nc_sys-var-changed (reac args / s_var is_change) (setq s_var (car args) is_change (cadr args)) (if (and is_change (= s_var "CVPORT")) (nc_crosshair-color-set)) (princ) ) ;инициализация переменных цветов перекрестия (nc_crosshair-color-init) ;если реактор изменения системных переменных существует, то "похерем" его (на всякий случай, вдруг он неправильный) (if NC_MYSYSVARREACTOR (progn (setq NC_MYSYSVARREACTOR nil) (vlr-remove-all :vlr-SysVar-reactor) )) ;а если не существует, то создадим его (if (null NC_MYSYSVARREACTOR) (setq NC_MYSYSVARREACTOR (vlr-SysVar-Reactor nil (list '(:vlr-SysVarChanged . nc_sys-var-changed))) ) )

Настройка интерфейса

Вот видите кнопки по краям, они огромные. Может кто знает как уменьшить их размер.

Заранее огромное спасибо.

На сайте c 17.12.2016
Сообщений: 32
Тверь

На первом скрине вверху слева, обратите внимание на строчку "Классический автокад". На втором скрине - "2D рисование и аннотации". Начните с этого.

На сайте c 18.10.2010
Сообщений: 38

Всем привет! Подскажите пожалуйста, какой файл отвечает за сохранение настроек Modifier List, Utilities и Viewport Settings?

Очередной раз слетели все настройки посреди проекта, надоело каждый раз настраивать

Особенно интересует Viewport Settings, нужно чтобы любая сцена, даже скачанная с интернета сразу открывалась с нужными настройками (как на скриншоте). А сейчас настройки сохраняются только для конкретного файла после предварительной установки нужных значений.

На сайте c 23.01.2016
Сообщений: 880
Россия, ЦФО
Цитата baikot:

Всем привет! Подскажите пожалуйста, какой файл отвечает за сохранение настроек Modifier List, Utilities и Viewport Settings?

Присоединяюсь к вопросу, но что-то мне подсказывает, что нет специального настроечного файла, кроме только как через maxstart

Изменить цвет курсора

Author24 — интернет-сервис помощи студентам

Доброго времени суток!
Нужно изменить цвет курсора в AutoCAD 2015.
Подскажите, пожалуйста, как мне это сделать.

Добавлено через 3 минуты
И ещё попутно вопрос.
Есть чертёж, в него вставлено изображение. Когда меняю положение камеры (зажимаю колесо мыши и двигаю ее), то в то изображение исчезает до тех пор, пока не отпущу колесо мыши. Нужно что бы изображение не исчезало.

94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
Ответы с готовыми решениями:

Как изменить цвет курсора ввода и курсора мыши в элементе Edit
Всем Здравия. Проблема в следующем, задал цвет фона и цвет текста в Edit, тут все нормально, но.

Изменить цвет курсора в TextBox
Можно ли изменить цвет курсора в TextBox?

Как изменить цвет курсора?
Подскажите, пожалуйста, команду для изменения цвета курсора. mov cx, 0607h ;знаю, что это.

Как изменить цвет курсора?
Здравствуйте! C++ Borland Builder/ Стоит следующая задача: "Требуется ввести курсор в область.

87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
Помогаю со студенческими работами здесь

Как изменить цвет вкладки при наведении курсора?
Здравствуйте! Как изменить цвет вкладки при наведении на нее курсором? Напр. вкладка серого цвета.

Как изменить цвет Label при наведении курсора?
Есть несколько Label, которым назначен обработчик - загрузить в RichTextBox из файла rtf. Как.

При наведении курсора на строку формы изменить цвет её фона
1)Написать script, в результате работы которого при попадании курсора мыши на элемент списка формы.

Как изменить цвет кнопки при наведении на нее курсора мыши?
Добрый день! Как изменить цвет кнопки при наведении на нее курсора мыши?

Или воспользуйтесь поиском по форуму: