[baker]

1). Я со своими куриными мозгами не могу поменять цвет рабочего поля чертежа с белого на чёрный.
2). В "свободной орбите" вращение объекта происходит не вокруг предполагаемого центра, (кот. в более ранних версиях находится в центре круга, обозначающего функцию орбиты), а вокруг какого-то другого центра, мне не понятного, и расположенного далеко от вращаемого объекта. Это приводит к тому, что при попытке вращения объект сразу исчезает с экрана и его можно найти где-то далеко, только резко уменьшив масштаб чертежа.

[Хмурый]

по 1 см. Настройки
по 2. можно выделить объект и вращать относительно него

[baker]

по первому вопросу супер ответ!!

можно по второму вопросу подробне...

[Хмурый]

выдели объект и крути орбитой

[Vova]

Сообщение от baker не могу поменять цвет рабочего поля чертежа с белого на чёрный.

Ты, очевидно, раньше не работал в автокаде, иначе не мог не знать как меняется цвет. Вот исходя из этого предположения хочу спросить, почему черный цвет для тебя предпочтительней светлого? (там не белый цвет, а кремовый). Ведь недаром автодеск такой сделал по умолчанию. Значит, посчитал что так эргономичней, и это уже во второй версии подряд

[Хмурый]

Vova, у нас белый цвет (в России), а не кремовый.

[BM60]

А те, которые предпочитают оставлять умолчательный черный (в прежних версиях) кажутся мне теми, кто вернулся в эпоху пионеров, когда в школе классная доска была только черной.
Коричневой она стала много позже, но VOVA наверняка помнит то время.
Значит, кремовое суть "эволюция" из коричневого.
А потом жалуются, глаза болят. Отслеживать нужную нулевой толщины линию в чёрти-каком направлении.

[pinjener]

Замена фона: Обозреватель меню(большая красная кнопка А)/параметры/вкладка экран;кнопка:цвета/пункт:цвет.

[lll737]

С орбитой всё просто. Зажимаешь Shift (я пользуюсь левым) и средней кнопкой (колесом) пользуешься как для обычного панорамирования.

[Nike]

Сообщение от baker поменять цвет рабочего поля чертежа с белого на чёрный

Повесил себе на Ctrl+B переключалку фона белый-черный-белый и радуюсь:

Код:

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

(defun background_color (/)
  (if (= (getenv "Background") "0")
    (progn
      (vlax-put-property
        (vla-get-display (vla-get-preferences (vlax-get-acad-object)))
        "ModelCrosshairColor"
        000
      ) ;_ end of vlax-put-property
      (vlax-put-property
        (vla-get-display (vla-get-preferences (vlax-get-acad-object)))
        "GraphicsWinModelBackgrndColor"
        16777215
      ) ;_ end of vlax-put-property
    ) ;_ end of progn
    (progn
      (vlax-put-property
        (vla-get-display (vla-get-preferences (vlax-get-acad-object)))
        "ModelCrosshairColor"
        16777215
      ) ;_ end of vlax-put-property
      (vlax-put-property
        (vla-get-display (vla-get-preferences (vlax-get-acad-object)))
        "GraphicsWinModelBackgrndColor"
        000
      ) ;_ end of vlax-put-property
    ) ;_ end of progn
  ) ;_ end of if
  (princ)
)

[AlexV]

Кстати, при реалистичном и концептуальном визуальных стилях можно крутить-вертеть модель с помощью "визуального куба". Оказывается, в контекстном меню "на нем" есть еще быстрое задание ПСК, только сейчас внимание обратил..

[Хмурый]

слово "зад" на кубе меня убивает

[Nike]

Сообщение от Хмурый слово "зад" на кубе меня убивает

Эту "розу ветров" можно в идиотеку Тёмке отправить отправить, он оценит!

[IMG]http://s42.***********/i096/1003/5b/0e3e6ceeb8bf.jpg[/IMG]

[AlexV]

Сообщение от Nike Повесил себе на Ctrl+B переключалку фона белый-черный-белый и радуюсь..

А чего, часто переключаешь? По-настроению, чтоль, - сегодня хреновое - черный, завтра нормальное - белый...

слово "зад" на кубе меня убивает

-ну тут как в анекдоте "Вовочка, нет такого слова Ж...!" - "Как же так может быть, Марья Петровна? Ж... есть, а слова нету.."
Из куба слова не выкинешь! Не писать же "Вид сзади", длинновато получится..

[BM60]

А слово "тыл" нашим "рокаризаторам" и в школе не снилось. Даже в американские пионеры знаю "тыльную сторону" = тыл.

[Nike]

Сообщение от AlexV А чего, часто переключаешь? По-настроению, чтоль, - сегодня хреновое - черный, завтра нормальное - белый

бывает - работаю с чертежами, выполненными в разной цветовой гамме, и на белом и на черном фонах. Да и сам раньше работал на черном, с 2010-го приучил себя к белому.

[AlexV]

А я наоборот, раньше с белым работал, экспериментировал с разного рода зелеными, кремовыми, желтыми, серыми и т.д. Но сейчас - с черным..

[Startrek]

BM60
Цвет рабочего пространства зависит от индивидуальности зрения. Лично я не разлечаю все цвета на сером/белом/kремовом итд поле, а вот на черном вижу все и четко. Ну а знания "пионеров" или современных детей зависит не от цвета доски а от мастерства учителя и мозгов учеников. К примеру в нашей продвинутой Америке - в выпускном классе ученички с трудом разбирают азы алгебры (на уровне 5-го класса) а доски БЕЛЫЕ ПЛАСТИКОВЫЕ и т. д.

[Vova]

Сообщение от Nike Да и сам раньше работал на черном, с 2010-го приучил себя к белому.

А как читаешь свои старые чертежи? А также чертежи тех кто не приучил себя к белому?
Кстати, придется вскоре переучиваться опять: в 2011, судя по картинкам, опять черно

[AlexV]

Сообщение от Vova Цитата: Сообщение от AlexV Посмотреть сообщение Да и сам раньше работал на черном, с 2010-го приучил себя к белому. А как читаешь свои старые чертежи? А также чертежи тех кто не приучил себя к белому? Кстати, придется вскоре переучиваться опять: в 2011, судя по картинкам, опять черно

Це не я писал! А Nike, судя по #10, "повесил себе на Ctrl+B переключалку фона белый-черный-белый и радуется.."

[Vova]

Сообщение от AlexV Це не я писал! А Nike,

Поправился

[Nike]

Сообщение от Vova как читаешь свои старые чертежи? А также чертежи тех кто не приучил себя к белому? Кстати, придется вскоре переучиваться опять: в 2011, судя по картинкам, опять черно

Так и читаю - жму Ctrl+B и меняю цвет фона, если надо.
Опять переучиваться не буду - всегда считал что на белом фоне как в Word и прочих программах работать более естественно, чем на черном. Просто это трудновато оказалось - слишком когда-то привык к черному.

[Vova]

Сообщение от Nike Так и читаю - жму Ctrl+B и меняю цвет фона, если надо

А что делать другим читателям твоих файлов, которые не имеют волшебной кнопки? Допустим, начальник захочет посмотреть и покопаться в файле? Или твой чертеж будет продолжать другой
Цвет должен быть таким, как у большинства, имхо

[gomer]

Вот такой есть еще вариант: http://dwg.ru/dnl/5976

[Nike]

gomer, здорово! Выложи уж lsp, чё стыдиться, и не жадничай

Сообщение от Vova А что делать другим читателям твоих файлов, которые не имеют волшебной кнопки? Допустим, начальник захочет посмотреть и покопаться в файле? Или твой чертеж будет продолжать другой Цвет должен быть таким, как у большинства, имхо

Пусть лезут в options - их проблемы, я не знаю какой цвет у большинства Цветовых правил черчения у нас нет - ни у кого же голова не болела, что мне придется Ctrl+B придумывать.

[Vova]

Сообщение от Nike Цветовых правил черчения у нас нет

И без правил никому не приходит в голову рисовать по черному темным цветом. Так и тебе не придет в голову рисовать по белому светлым, например, желтым. Поэтому тем, кому придется на своем черном экране смотреть твой файл, будут поминать тебя недобрым словом. А тебе на своем белом не увидеть чужих светлых линий

[Nike]

Сообщение от Vova Так и тебе не придет в голову рисовать по белому светлым, например, желтым. Поэтому тем, кому придется на своем черном экране смотреть твой файл, будут поминать тебя недобрым словом

Стараюсь помнить о тех, кто может смотреть мои чертежи на своем фоне и с цветами в крайности не вдаваться.
Желтый не применяю, оттенки серого использую читабельные и на черном фоне.

Сообщение от Vova А тебе на своем белом не увидеть чужих светлых линий

На этот случай я имею такую штучку:

Код:

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

(defun C:set-layer-color (/ echo sen ent lay ss len da)
  (setq echo (getvar "CMDECHO"))
  (setvar "CMDECHO" 0)
  (setq sen (entsel "\n Выберите объект слоя, цвет которого хотите изменить:"))
  (if sen
    (progn (setq ent (entget (car sen)))
           (setq lay (cdr (assoc 8 ent)))
           (command "_layer" "_c" (acad_colordlg 7 Nil) lay "")
    ) ;_ end of progn
    (princ "\n Объект не выбран!")
  ) ; if sen
  (setvar "cmdecho" echo)
  (princ)
)

[PAPIK]

Сообщение от AlexV Кстати, придется вскоре переучиваться опять: в 2011, судя по картинкам, опять черно

в ACAD 2011 фон цвета 33,40,48 (типа темно-темно синий как мне кажется). Мне нравится

[Jonas]

На черном хорошо видны основные цвета - желтый, зеленый, голубой ну и конечно их оттенки и плюс серые. Хорошо видны значит эргономичны, не требуют напряжения глоз.
Попробуйте чертеж выполненый на черном экране посмотреть на белом и наоборот.
Правда следует признать то что, если чертеж с "черного" нужно распечатать то не обойтись без стиля печати.

Из личного опыта.
У меня больные глаза (искуственные хрусталики), когда работал на кульмане то была бооольшая проблема, через пару часов напряженной работы все расплывалось в одно облако с переходом на компьютер и акад с черным экраном я просто ожил. В акаде работаю 11 лет и только на черном экране.
Покал писал это сообщение, уже начали расплываться буквы.

[antan83]

жесть...

[Chapter]

Сообщение от Jonas Из личного опыта. У меня больные глаза (искуственные хрусталики), когда работал на кульмане то была бооольшая проблема, через пару часов напряженной работы все расплывалось в одно облако с переходом на компьютер и акад с черным экраном я просто ожил. В акаде работаю 11 лет и только на черном экране. Покал писал это сообщение, уже начали расплываться буквы.

[tugris]

Предпочитаю чертить на черном. А вообще мне кажется это беспредметный разговор. Так поболтать. Кому, что нравится. А печать все равно на белом.

[antan83]

в монохроме...

[Disney]

Сообщение от Nike Повесил себе на Ctrl+B переключалку фона белый-черный-белый и радуюсь: Код: [Выделить все] (defun background_color (/) (if (= (getenv "Background") "0") (progn (vlax-put-property (vla-get-display (vla-get-preferences (vlax-get-acad-object))) "ModelCrosshairColor" 000 ) ;_ end of vlax-put-property (vlax-put-property (vla-get-display (vla-get-preferences (vlax-get-acad-object))) "GraphicsWinModelBackgrndColor" 16777215 ) ;_ end of vlax-put-property ) ;_ end of progn (progn (vlax-put-property (vla-get-display (vla-get-preferences (vlax-get-acad-object))) "ModelCrosshairColor" 16777215 ) ;_ end of vlax-put-property (vlax-put-property (vla-get-display (vla-get-preferences (vlax-get-acad-object))) "GraphicsWinModelBackgrndColor" 000 ) ;_ end of vlax-put-property ) ;_ end of progn ) ;_ end of if (princ) )

Тоже повесил на кнопку, очень удобно
Работаю на чёрном фоне, видео снимаю на белом, всё бы хорошо, но вот "Вектор автоотслеживания" не инвертирует свой цвет, может кто-нибудь подсказать, как это сделать программно?

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

Пробуй...

Код:

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

(vl-load-com)

(defun background_color (/ disp)
  (setq disp (vla-get-display (vla-get-preferences (vlax-get-acad-object))))
  (foreach prop '(("ModelCrosshairColor" (0 . 16777215))
                  ("GraphicsWinModelBackgrndColor" (16777215 . 0))
                  ("AutoTrackingVecColor" (0 . 16777215))
                  )
    (vlax-put-property disp
                       (car prop)
                       (if (= (getenv "Background") "0")
                         (caadr prop)
                         (cdadr prop)
                         ) ;_ end of if
                       ) ;_ end of vlax-put-property
    ) ;_ end of foreach
  (princ)
  ) ;_ end of defun

[Disney]

Сообщение от Кулик Алексей aka kpblc Пробуй... Код: [Выделить все] (vl-load-com) (defun background_color (/ disp) (setq disp (vla-get-display (vla-get-preferences (vlax-get-acad-object)))) (foreach prop '(("ModelCrosshairColor" (0 . 16777215)) ("GraphicsWinModelBackgrndColor" (16777215 . 0)) ("AutoTrackingVecColor" (0 . 16777215)) ) (vlax-put-property disp (car prop) (if (= (getenv "Background") "0") (caadr prop) (cdadr prop) ) ;_ end of if ) ;_ end of vlax-put-property ) ;_ end of foreach (princ) ) ;_ end of defun

Что-то не работает , Хотя по логике должно...

[IMG]http://s005.***********/i211/1005/32/d8944c8ae6c1.gif[/IMG]

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

В таком случае можно попробовать лезьть в реестр и там менять значения. Ветка

Код:

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

(strcat "HKEY_CURRENT_USER\\"
        (vlax-product-key)
        "\\Profiles\\"
        (vla-get-activeprofile
          (vla-get-profiles
            (vla-get-preferences
              (vlax-get-acad-object)
              ) ;_ end of vla-get-preferences
            ) ;_ end of vla-get-profiles
          ) ;_ end of vla-get-activeprofile
        "\\Drawing Window"
        ) ;_ end of strcat

Ключи: "*ATrack vector*"
Короче, вот код, который вернет ключи и их значения:

Код:

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

(defun test (/ hive lst)
  (setq hive (strcat "HKEY_CURRENT_USER\\"
                     (vlax-product-key)
                     "\\Profiles\\"
                     (vla-get-activeprofile
                       (vla-get-profiles
                         (vla-get-preferences
                           (vlax-get-acad-object)
                           ) ;_ end of vla-get-preferences
                         ) ;_ end of vla-get-profiles
                       ) ;_ end of vla-get-activeprofile
                     "\\Drawing Window"
                     ) ;_ end of strcat
        lst  (mapcar
               (function
                 (lambda (x)
                   (list hive x (vl-registry-read hive x))
                   ) ;_ end of lambda
                 ) ;_ end of function
               (vl-remove-if-not
                 (function
                   (lambda (x)
                     (wcmatch (strcase x) "*ATRACK*")
                     ) ;_ end of lambda
                   ) ;_ end of function
                 (vl-registry-descendents hive "")
                 ) ;_ end of vl-remove-if-not
               ) ;_ end of mapcar
        ) ;_ end of setq
  ) ;_ end of defun

[Disney]

Сообщение от Кулик Алексей aka kpblc В таком случае можно попробовать лезьть в реестр и там менять значения.

Здорово... но во-первых как это делается(меняется значение), а то я первый раз вижу и слышу(читаю) про реестры и ключи, во-вторых а оно того стоит? в смысле оно не опасно, лазить куда попало(в реестр)...

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

Значение меняется стандартной функцией vl-registry-write (параметры вызова - в справке). А насчет опасно-не опасно... Ну выполни экспорт ветки реестра, потом обратно засунешь
P.S. Я сам с реестром достаточно плотно работаю, пока явных багов не видел. Правда, у меня есть правило: сначала работаю в AutoCAD, меняя значения нужных мне параметров, потом читаю значения из реестра и нахожу отличия, и только потом пишу лисп...