[liana]

:? Не пойму почему штриховка не выводится с масштабом 0.01,
т.е. 0.02 может, а меньше нет. И у кждого типа есть свой предел масштаба. Можно ли это изменить?
И ещё, при определенном масштабе и угле неклона 0 - все отлично. Стоит только изменить угол на 90 и штриховка пропала. Или при определенном масштабе отображается не полностью. :cry:
Заранее благодарна за помощь! :wink:

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

Проверь значение snapbase и место, где располагается штрихуемая область. Если относ штриховки от snapbase превышает некий предел, штриховка выполняется некорректно. Также просмотри значение MaxHatch - имхо проблема и в нем может быть.
Первое: (getvar "snapbase")
Второе: (getenv "MaxHatch")

[liana]

Проверила переменные и вот что выдал:
Command: (getvar "snapbase")
(0.0 0.0)
Command: (getenv "MaxHatch")
"100000"
А что с ними делать :?:

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

Ну так и где штриховка выполняется? Если очень далеко от (0,0,0) (больше где-то 100 000 единиц чертежа), вероятность получить нормальный вид штриховки весьма мала. Рецепт: изменить значение snapbase.
Если, допустим, общее количество элементов в штриховке превышает MaxHatch, значение надо увеличивать (посмотри по справке, сколько там максимум).

[lenivec]

А чё, масштаб самого чертежа менять лень или боязно?

[liana]

Штриховвка выполняется х:2127664786.1072; y:3574407545.9146
В Helpе нашла: "At the Command prompt, enter (setenv “MaxHatch” “n”) where n is a number between 100 and 10000000 (ten million). " и успешно пвыполнила. Для snapbase не нашла пределов, наверно их и нет (англ. слаб) и решила довести его до порядка значений координат
Command: snapbase
Enter new value for SNAPBASE <1000.0000,1000.0000>: 9999999999,9999999999
Command:
И совершенно ничего на изменилсь. :cry: Тогда перенесла чертеж очень близко к (0,0) с измененными snapbase, MaxHatch и все получилось (значит SNAPBASE не присвоилья?), но только размеры некоторые взбесились (размерные и выносные линии улетели кто куда, т.е. размерная осталась на месте, а выносные вместе с базовыми точками ухренячили далеко или наоборот :x ). Пошла напролом: удалила и долго, нудно выставляла опять.
Поняла, что неоходимо учитья рационально чертить!
Заранее благодарна за анализ! :wink:

[liana]

Штриховвка выполняется х:2127664786.1072; y:3574407545.9146
В Helpе нашла: "At the Command prompt, enter (setenv “MaxHatch” “n”) where n is a number between 100 and 10000000 (ten million). " и успешно пвыполнила. Для snapbase не нашла пределов, наверно их и нет (англ. слаб) и решила довести его до порядка значений координат
Command: snapbase
Enter new value for SNAPBASE <1000.0000,1000.0000>: 9999999999,9999999999
Command:
И совершенно ничего на изменилсь. :cry: Тогда перенесла чертеж очень близко к (0,0) с измененными snapbase, MaxHatch и все получилось (значит SNAPBASE не присвоилья?), но только размеры некоторые взбесились (размерные и выносные линии улетели кто куда, т.е. размерная осталась на месте, а выносные вместе с базовыми точками ухренячили далеко или наоборот :x ). Пошла напролом: удалила и долго, нудно выставляла опять.
Поняла, что неоходимо учитья рационально чертить!
Заранее благодарна за анализ! :wink:

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

Ну на самом деле после изменения snapbase надо было попробовать по новой выполнить штриховку - могло и сработать.
По поводу переноса: сейчас сам бьюсь над такой же проблемой, решить по-человечески не совсем получается. Но если коротко, то:
1. Сделать dimassoс =1 (для гарантии)
2. Снять ассоциативность размеров (dimdisassociate)
3. Перенести объекты
4. Восстановить ассоциативность размеров (dimreassociate)
Ну и лисп, делающий все то же самое:

Код:

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

(defun kpblc-move (/ _dimassoc_ _cmdecho_ _nomutt_)
  (vl-load-com)
  (if (not *kpblc-activedoc*)
    (setq *kpblc-activedoc* (vla-get-activedocument (vlax-get-acad-object)))
    ) ;_ end of if
  (vla-startundomark *kpblc-activedoc*)
  (setq	_dimassoc_ (getvar "dimassoc")
	_cmdecho_  (getvar "cmdecho")
	_nomutt_   (getvar "nomutt")
	) ;_ end of setq
  (setvar "dimassoc" 1)
  (vl-cmdf "_.dimdisassociate" "_All" "")
  (command "_.move" (ssget) "")
  (while (/= (getvar "cmdactive") 0)
    (command pause)
    ) ;_ end of while
  (mapcar 'setvar '("cmdecho" "nomutt") '(0 1))
  (setvar "dimassoc" _dimassoc_)
  (command "_.dimreassociate" "_all")
  (while (/= (getvar "cmdactive") 0)
    (command "")
    ) ;_ end of while
  (mapcar 'setvar (list "cmdecho" "nomutt") (list _cmdecho_ _nomutt_))
  (vla-endundomark *kpblc-activedoc*)
  ) ;_ end of defun

Сопряженные трудности и нерешенные проблемы:
1. Не отслеживаются отключенные слои - если размеры на таких слоях, что с ними будет, предсказать невозможно.
2. Не отслеживается имеющееся состояние ассоциативности размеров. они все преобразовываются в ассоциативные, что не есть хорошо - иногда надо наоборот.
3. Нет отлова досрочного выхода по Esc.
Ну и так далее. В общем, использовать его в качестве законченной функции имхо не стоит - только как, может, база, для дальнейшей доработки.