Тема: Блоки всё время рисуются тонкими линиями, даже с большим Lineweight

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

Re: Блоки всё время рисуются тонкими линиями, даже с большим Lineweight

> Устинов Юрий
Я с такой ситуацией не встречался, возможно
у тебя отключено заполнение плилиний
Проверь переменную FILLMODE, она должна быть
выставлена в 1, если 0 - тогда полилинии не
закрашиваются
~'J'~

Re: Блоки всё время рисуются тонкими линиями, даже с большим Lineweight

> Устинов Юрий
Тип линии примитивов в блоке должны быть "поблоку" ("byblock").

Re: Блоки всё время рисуются тонкими линиями, даже с большим Lineweight

> Александр Ривилис
Только не тип линии, а вес - Lineweight, "поблоку" ("byblock").

Re: Блоки всё время рисуются тонкими линиями, даже с большим Lineweight

> Dron
Нет уж, тут ты неправ, проверь версию
А. Ривилиса, я с ним абс. согласен
~'J'~

Re: Блоки всё время рисуются тонкими линиями, даже с большим Lineweight

Для блоков, даже если "программирование: VBA" действуют простые правила:
1. Если примитивам, входящим в определение блока, присвоены "конкретные" свойства (цвет, тип линии, вес), то во вставках блока эти свойства будут постоянные.
2. Если свойства "BYLAYER" - во вставках будут изменяться только при изменении свойств всего слоя, а изменить свойства отдельной вставки нельзя.
3. Если свойства "BYBLOCK" - во вставках можно изменить и изменением свойств слоя, и изменением свойств отдельной вставки блока - так же, как изменять свойства отдельных примитивов. Этот вариант наиболее гибкий.
В то же время можно с успехом пользоваться и постоянными свойствами для отдельных примитивов. Например, цвет запрещающего дорожного знака должен быть всегда именно красным и не меняться, значит и в блоке он должен быть красным.
И примитивы блока, как правило, лучше делать на слое 0 - тогда вставка блока (и входящие в него примитивы) наследует свойства того слоя, на который вставлен блок.

Re: Блоки всё время рисуются тонкими линиями, даже с большим Lineweight

Всем большое спасибо, Вы мне очень помогли. Сделал следующим образом и всё уладилось:

For I = 0 To blockObj.Count - 1
    blockObj.Item(I).Lineweight = acLnWtByBlock
    blockObj.Item(I).Update
Next I

Кстати, мне не приходят письма уведомления об ответах, это нормально?

Re: Блоки всё время рисуются тонкими линиями, даже с большим Lineweight

> Dron
Правда. Моя ошибка.