[radist]

Знаю,что в автокаде после снятия выделения можно как-то выбрать все эти объекты снова (выделить последние объекты).
Подскажи как это сделать?

[KSI]

На запрос выбора объектов
_p (латиницей), или П (последний).
Или на запрос выбора ввести ?, покажет все опции команды. И прочитать Справку, справочник команд - Выбор.

[radist]

Спасибо!!!
А эта функция работает только над объектами, с которыми производили какие-то действия? Если просто выделяю объект, отменяю выделение, и выполняю команду, то она не срабатывает

[KSI]

Выделение и отмена выделения это не те действия. Данные о выделении не сохраняются.

[radist]

Огромное спасибо!!!

[CaMoCAD]

Сообщение от KSI Данные о выделении не сохраняются.

Да ну?
Сделал себе кнопку "Семен Семеныч" с макросом ^C^C_.pselect;_p;;zoom;o;_.pselect;_p;;
замечательно выделяет предыдущий набор, сброшенный в том числе искейпом + зуммирует на весь экран выбранные объекты (если zoom не нужен, то начиная с него макрос оборвать)

[Profan]

Сообщение от KSI На запрос выбора объектов _p (латиницей), или П (последний). ...

Английской опции "_p" при запросе выбора объектов соответствует русская опция "т". А русской опции "П" соответствует английская опция "_L".

[KSI]

Profan, да, не прав. Поторопился. Последний, это последний нарисованный объект.

CaMoCAD, на самом деле, здесь ещё зависит от метода выбора. Если выбирать рамкой, то при использовании макроса выбираются все объекты. А если выбирать по одному, то после макроса выбирается только тот объект, который был выбран первым.
А если файл был только открыт, то с первого раза макрос не срабатывает, идет сообщение *Неверный выбор*. Да, при этом точно так же ведёт себя и команда _select.

[CaMoCAD]

KSI, странно, у меня высь набор выделяется (aCAD2010)
PS Попробовал изменить PICKADD, тоже рояля не играет...все работает

[vik74]

Сообщение от CaMoCAD Сделал себе кнопку "Семен Семеныч" с макросом ^C^C_.pselect;_p;;zoom;o;_.pselect;_p;;

долго пользовался этим удобным макросом. Но переустановка системы, новый автокад 2012 с импортом настроек из преженего
После запуска заветной кнопочки, не работает:
Команда: _.pselect
Выберите объекты: _p
найдено: 1

Выберите объекты:

Команда: zoom
Неизвестная команда "ZOOM". Для вызова справки нажмите F1.


Команда: o
ПОДОБИЕ
Текущие настройки: Удалить исходные=Нет Слой=Источник OFFSETGAPTYPE=0
Укажите расстояние смещения или [Через/Удалить/Слой] <Через>: _.pselect

Требуется численное значение расстояния, две точки или ключевое слово.

как бы восстановить?

[Krieger]

Подчеркиваний в макросе нет, попробуй так:

^C^C_.pselect;_p;;_zoom;_o;_.pselect;_p;;

[vik74]

Подчеркиваний в макросе нет, попробуй так:

Спасибо! Так заработало!
Еще код с этого форума http://forum.dwg.ru/showthread.php?t=51836 пост 4

Код:

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

$M=$(if,$(getvar,cmdactive),,_select;)_p

тоже работает

[Кондратий Тихонович]

Тоже хочу, чтобы после того как я нажимаю Escape и сбрасываю выделение сразу всех объектов можно было одним кликом повторно их выделить.

Пробовал что в этой теме описано - не фига не выходит.
В пространстве листа вообще глючит. А в модели выделяется 1 объект. Причем не предыдущего выделения. А вообще какого-то давнишнего (чуть ли в начале работы выделявшегося). Причем один.

Прочитал темы
можно ли повторить выделение?
Отмена последнего выделенного объекта
Повторение последнего выбора объектов
Отмена выделения обектов в autocad 2013 с шифтом рамкой происходит по одному объекту. Помогите вернуть обратно?
Повторное, но уже автоматическое выделение объектов.
Правильный предыдущий выбор
Как в Autocad после выполнения команды оставить объект выделенным?

Нифига не выходит.

Перепробовал разные лисп-коды. Нифига.

Да.
Ещё хотелось бы чтобы можно было по нажатии кнопки отменять выбор в обратной последовательности (т.е. сначала отменить выбор объекта, выделенного последним, потом - предпоследним, и т.д. вплоть до первого)

Или в автокаде не сохраняется инфа о том, в какой последовательности был выбор?

Короче
У меня AutoCAD 2010 Portable и два вопроса
1) Как одним кликом восстановить выделение объектов, которые были выделены до нажатия ESCAPE
2) Как снимать выделение объектов в порядке, обратном порядку их выделения (сначала снять выделение с выделенного последним, потом - предпоследним, и т.д. вплоть до выделенного первым).
Имеется в виду не вручную (SHIFT + CLICK) , указывая у какого объекта снять выделение, а автоматом.
Повесить к примеру эту функцию на кнопку F3. И чтобы при каждом нажатии F3 происходила отмена выделения очередного объекта в последовательности. Чтобы мне не нужно было запоминать последовательность выделения. Чтобы это делал автокад

3) Ну тогда уж до кучи и обратная п2 функция: по F4 восстанавливать выделение по одному объекту в той же последовательности как они выделялись ранее

[Setvar]

Сообщение от Кондратий Тихонович У меня AutoCAD 2010 Portable

AutoCAD Portable не является официальной лицензионной версией и обсуждению не подлежит.

[Сергей812]

а если насчет функционала:

Сообщение от Кондратий Тихонович 1) Как одним кликом восстановить выделение объектов, которые были выделены до нажатия ESCAPE 2) Как снимать выделение объектов в порядке, обратном порядку их выделения (сначала снять выделение с выделенного последним, потом - предпоследним, и т.д. вплоть до выделенного первым). Имеется в виду не вручную (SHIFT + CLICK) , указывая у какого объекта снять выделение, а автоматом. Повесить к примеру эту функцию на кнопку F3. И чтобы при каждом нажатии F3 происходила отмена выделения очередного объекта в последовательности. Чтобы мне не нужно было запоминать последовательность выделения. Чтобы это делал автокад 3) Ну тогда уж до кучи и обратная п2 функция: по F4 восстанавливать выделение по одному объекту в той же последовательности как они выделялись ранее

то это в другую ветку - программирование. Есть событие изменения выбора ImpliedSelectionChanged (если для .Net), в нем анализировать текущие выбранные элементы и сравнивая с предыдущими наборами, вести список последовательности выделенных объектов.

[Кондратий Тихонович]

Сообщение от Сергей812 это в другую ветку - программирование.

Т.е. встроенного такого функционала автокад не имеет?

----- добавлено через ~2 мин. -----

Сообщение от Сергей812 Есть событие изменения выбора ImpliedSelectionChanged (если для .Net), в нем анализировать текущие выбранные элементы и сравнивая с предыдущими наборами, вести список последовательности выделенных объектов.

Т.е. автокад не запоминает порядок выделения объектов и, соответственно, не получится выделять и снимать выделение в запомненной последовательности?

Я правильно Вас понял?

Это точно так?

[Сергей812]

Сообщение от Кондратий Тихонович Т.е. встроенного такого функционала автокад не имеет?

откуда? Само выделение не оказывает изменения в БД чертежа - это какие то ваши личные хотелки, чтобы поддерживался стек действий пользователя по выделению объектов.

----- добавлено через ~6 мин. -----

Сообщение от Кондратий Тихонович Т.е. автокад не запоминает порядок выделения объектов и

выделение объектов - это лишь способ получить некоторую группу объектов для последующего применения к ним групповой операции. Порядок выделения не играет никакой роли.

[Кондратий Тихонович]

Сообщение от Сергей812 Порядок выделения не играет никакой роли.

Ошибаетесь.
В порядке выделения может содержаться определенная логика

[Сергей812]

Сообщение от Кондратий Тихонович В порядке выделения может содержаться определенная логика

может - но программисты Аутодеска не реализовали в базовом функционале акада подобное. Есть просто коллекция выделенных пользователем объектов и на изменение счетчика количества элементов подвешено событие ImpliedSelectionChanged. И, например, если выделите несколько объектов сразу - по какому критерию очередности их добавлять в стек/очередь? Событие будет одно. И как разделять разные очереди выделения?

[Кондратий Тихонович]

Ну а вообще. Как тогда решают уважаемые юзвери такую проблему:
Ведь бывает нужно вернуть предыдущий набор выделенных объектов к примеру без последних двух выделенных объектов. А набор, к примеру, состоит из 50-ти объектов.

Вручную заново прокликать 48 объектов как-то не айс.
К примеру ты минут 10 шифткликом по одному выбирал и добавлял в набор объекты, а потом случайно кликнул без шифта и всё выделение сбросилось. И вся работа насмарку. Мочи мочало - начинай сначала
Приходится заново прокликивать


Опытным путем установил, для того, чтобы вернуть выделение сразу всех ранее выделенных объектов нужно ввести в командной строке:
_SELECT, а потом _P

Макросы типа ^C^C_.pselect;_p;;zoom;o;_.pselect;_p;;
повешенные на кнопку, у меня почему-то работают не корректно.
Вместо автовыделения мне предлагают самому, вручную "выбрать объекты"

[PsixVK]

https://forum.dwg.ru/showpost.php?p=940858&postcount=5

[Сергей812]

Сообщение от Кондратий Тихонович Ну а вообще. Как тогда решают уважаемые юзвери такую проблему: Ведь бывает нужно вернуть предыдущий набор выделенных объектов к примеру без последних двух выделенных объектов. А набор, к примеру, состоит из 50-ти объектов. Вручную заново прокликать 48 объектов как-то не айс. К примеру ты минут 10 шифткликом по одному выбирал и добавлял в набор объекты, а потом случайно кликнул без шифта и всё выделение сбросилось. И вся работа насмарку. Мочи мочало - начинай сначала Приходится заново прокликивать

это совершенно другая задача - типа "ленивого" выделения: выделяете объекты, нажимаете хоткей/кнопку и только тогда выбранные объекты добавляются в список выделения (уже существующие объекты в списке пропускаются). Другой хоткей/кнопка удаляет выбранные объекты из списка (если они были внесены туда до этого, иначе игнорируются). Третий хоткей/кнопка выделяет объекты из списка на чертеже. Четвертый хоткей/кнопка очищает список. Т.е. создать свою коллекцию выделения, работающую независимо от стандартного механизма выделения. Тогда при "промахе" ничего не потеряется, можно хоть полдня выбирать объекты.

p.s. Но это другая ветка уже - программирование.

[Кондратий Тихонович]

Сообщение от PsixVK https://forum.dwg.ru/showpost.php?p=940858&postcount=5

Не очень понял. Поясните

----- добавлено через ~1 мин. -----

Сообщение от Сергей812 Но это другая ветка уже - программирование

Да тут на форуме каждый второй ЛИСП-программист.
Может помогут решить проблему?

[Сергей812]

Сообщение от Кондратий Тихонович Может помогут решить проблему?

ну как то так на скорую руку

// Windows
using System;
using System.Collections.Generic;

// AutoCAD
using Autodesk.AutoCAD.DatabaseServices;
using Autodesk.AutoCAD.Runtime;
using Autodesk.AutoCAD.ApplicationServices;
using Autodesk.AutoCAD.EditorInput;


namespace LazyObjectsSelection
{
public class Commands : IExtensionApplication
{

/// <summary>
/// Элемент списка выделенных объектов для определенного чертежа
/// </summary>
private struct SelectDrawingObjectsInfo:IComparable<SelectDrawingObjectsInfo>
{
/// <summary>
/// Имя файла DWG
/// </summary>
public string NameFile;
/// <summary>
/// Список выделенных объектов
/// </summary>
public List<ObjectId> ListSelectedObjects;

/// <summary>
/// Базовый конструктор структуры SelectDrawingObjectsInfo
/// </summary>
/// <param name="aNameFile">Имя файла DWG</param>
public SelectDrawingObjectsInfo(string aNameFile)
{
NameFile = aNameFile;
ListSelectedObjects = new List<ObjectId>();
}

/// <summary>
/// Реализация сравнения по умолчанию с другой структурой
/// </summary>
/// <param name="other">Другая структура</param>
/// <returns>Результат сравнения</returns>
public int CompareTo(SelectDrawingObjectsInfo other)
{
return String.Compare(NameFile, other.NameFile, true);
}
}


/// <summary>
/// Список выделенных объектов для всех открытых чертежей
/// </summary>
private static List<SelectDrawingObjectsInfo> _ListSels = null;


/// <summary>
/// Инициализация сборки
/// </summary>
public void Initialize()
{
// Создаем список выделенных объектов
_ListSels = new List<SelectDrawingObjectsInfo>();
// Подписываемся на удаление (закрытие) чертежа
Application.DocumentManager.DocumentDestroyed += new
DocumentDestroyedEventHandler(DocumentManager_DocumentDestroyed);
}


/// <summary>
/// Деинициализация сборки
/// </summary>
public void Terminate()
{
}


/// <summary>
/// Обработчик события менеджера документов - закрытие документа
/// </summary>
/// <param name="sender">Источник сообщения- Менеджер документов</param>
/// <param name="e">Дополнительные аргументы</param>
void DocumentManager_DocumentDestroyed(object sender, DocumentDestroyedEventArgs e)
{
int lIndex = _ListSels.BinarySearch(new SelectDrawingObjectsInfo(e.FileName));
if(lIndex>=0) _ListSels.RemoveAt(lIndex);
}


/// <summary>
/// Добавление выделенных объектов в коллекцию
/// </summary>
[CommandMethod("lso_AddSelectedObjects", CommandFlags.Modal | CommandFlags.NoPaperSpace |
CommandFlags.UsePickSet | CommandFlags.Redraw)]
public void lso_AddSelectedObjects()
{
Document lDoc = Application.DocumentManager.MdiActiveDocument;
PromptSelectionResult lSelResult = lDoc.Editor.SelectImplied();
if (lSelResult.Status == PromptStatus.OK)
{
if (lSelResult.Value.Count > 0)
{
// Получаем индекс текущего активного чертежа в коллекции
int lIndex;
do
{
lIndex = _ListSels.BinarySearch(
new SelectDrawingObjectsInfo(lDoc.Database.Filename));
if (lIndex < 0)
{
_ListSels.Add(new SelectDrawingObjectsInfo(lDoc.Database.Filename));
_ListSels.Sort();
}
} while (lIndex < 0);
// Получаем список выделенных примитивов и заносим в коллекцию
ObjectId[] lListSelObjects = lSelResult.Value.GetObjectIds();
SelectDrawingObjectsInfo lItem = _ListSels[lIndex];
int lCountAddedObjects = 0;
int lCountSkipObjects = 0;
foreach (ObjectId lObjId in lListSelObjects)
{
if (lItem.ListSelectedObjects.Contains(lObjId))
{
lCountSkipObjects++;
}
else
{
lCountAddedObjects++;
lItem.ListSelectedObjects.Add(lObjId);
}
}
_ListSels[lIndex] = lItem;
// Выводим статистику
lDoc.Editor.WriteMessage(
"\nВыделение: добавлено {0}; пропущено {1}; всего объектов {2}",
lCountAddedObjects, lCountSkipObjects,
lItem.ListSelectedObjects.Count);
return;
}
}
// Если что-то пошло не так
lDoc.Editor.WriteMessage("\nВыделение: нет выделенных объектов для добавления!");
}


/// <summary>
/// Удаление выделенных объектов из коллекции
/// </summary>
[CommandMethod("lso_RemoveSelectedObjects", CommandFlags.Modal | CommandFlags.NoPaperSpace |
CommandFlags.UsePickSet | CommandFlags.Redraw)]
public void lso_RemoveSelectedObjects()
{
Document lDoc = Application.DocumentManager.MdiActiveDocument;
PromptSelectionResult lSelResult = lDoc.Editor.SelectImplied();
if (lSelResult.Status == PromptStatus.OK)
{
if (lSelResult.Value.Count > 0)
{
// Получаем индекс текущего активного чертежа в коллекции
int lIndex = _ListSels.BinarySearch(
new SelectDrawingObjectsInfo(lDoc.Database.Filename));
if (lIndex >= 0)
{
// Получаем список выделенных примитивов и удаляем из коллекции
ObjectId[] lListSelObjects = lSelResult.Value.GetObjectIds();
SelectDrawingObjectsInfo lItem = _ListSels[lIndex];
int lCountRemoveObjects = 0;
int lCountNotFoundObjects = 0;
foreach (ObjectId lObjId in lListSelObjects)
{
if (lItem.ListSelectedObjects.Contains(lObjId))
{
lCountRemoveObjects++;
lItem.ListSelectedObjects.Remove(lObjId);
}
else
{
lCountNotFoundObjects++;
}
}
_ListSels[lIndex] = lItem;
// Выводим статистику
lDoc.Editor.WriteMessage(
"\nСнятие выделения: удалено {0}; вне выделения {1}; всего объектов {2}",
lCountRemoveObjects, lCountNotFoundObjects,
lItem.ListSelectedObjects.Count);
return;
}
}
}
// Если что-то пошло не так
lDoc.Editor.WriteMessage("\nСнятие выделения: нет выделенных объектов для исключения!");
}


/// <summary>
/// Выделение объектов из коллекции на чертеже
/// </summary>
[CommandMethod("lso_SetSelectedObjects", CommandFlags.Modal |
CommandFlags.NoPaperSpace | CommandFlags.Redraw)]
public void lso_SetSelectedObjects()
{
Document lDoc = Application.DocumentManager.MdiActiveDocument;
// Получаем индекс текущего активного чертежа в коллекции
int lIndex = _ListSels.BinarySearch(
new SelectDrawingObjectsInfo(lDoc.Database.Filename));
if (lIndex >= 0)
{
SelectDrawingObjectsInfo lItem = _ListSels[lIndex];
if (lItem.ListSelectedObjects.Count > 0)
{
lDoc.Editor.SetImpliedSelection(lItem.ListSelectedObjects.ToArray());
lDoc.Editor.WriteMessage("\nВыделено объектов: {0}",
lItem.ListSelectedObjects.Count);
return;
}
}
// Что-то пошло не так
lDoc.Editor.SetImpliedSelection(new ObjectId[0]);
lDoc.Editor.WriteMessage("\nНет объектов для выделения!");
}


/// <summary>
/// Сброс коллекции выделенных объектов на чертеже
/// </summary>
[CommandMethod("lso_ResetSelectedObjects", CommandFlags.Modal | CommandFlags.NoPaperSpace)]
public void lso_ResetSelectedObjects()
{
Document lDoc = Application.DocumentManager.MdiActiveDocument;
// Получаем индекс текущего активного чертежа в коллекции
int lIndex = _ListSels.BinarySearch(
new SelectDrawingObjectsInfo(lDoc.Database.Filename));
if (lIndex >= 0)
{
SelectDrawingObjectsInfo lItem = _ListSels[lIndex];
lItem.ListSelectedObjects.Clear();
_ListSels[lIndex] = lItem;
}
lDoc.Editor.SetImpliedSelection(new ObjectId[0]);
lDoc.Editor.WriteMessage(
"\nСписок ленивого выделения для данного документа очищен!");
}

}
}
}

На самом деле его еще надо дорабатывать - например, отлавливать события сохранения вновь созданного или переименование документа (хотя и так будет работать - просто в списке будет лишний "мусор" и после переименования пропадет выборка уже выделенных элементов, все придется сначала), разделить списки объектов в пространстве модели и для каждого листа и т.д. Но это уже пускай ваш штатный программист САПР занимается, я лишь идею отобразил в виде работающего кода)

Ну и кнопочки/хоткеи прикрутить на команды - это уже типовая задача.

[kifa]

Сообщение от Кондратий Тихонович Вручную заново прокликать 48 объектов как-то не айс.

когда объекты грамотно рассортированы по слоям/блокам/ итд то кликать ручками приходится ну очень редко

[PsixVK]

Сообщение от Кондратий Тихонович Не очень понял. Поясните

https://dwg.ru/pub/9
я себе сделал горячую клавишу и использую тот лисп. вызов лиспа get-last-select или gls

[Кондратий Тихонович]

Сообщение от PsixVK https://dwg.ru/pub/9 я себе сделал горячую клавишу и использую тот лисп. вызов лиспа get-last-select или gls

Тоже сегодня сделал себе кнопку и хоткей get-last-select ещё не видя Вашего сообщения когда ещё был на работе. Наткнулся на код шерстя форум

Это уже что-то

Но полностью проблема не решена. Хотелось бы пошагово возвращать и отменять выделение (см. п.2 и п.3)

Для этого, по видимому, в ЛИСП-коде нужно создавать какой-то динамический массив (или список) и заполнять его по мере выделения

----- добавлено через ~3 мин. -----

Сообщение от kifa когда объекты грамотно рассортированы по слоям/блокам/ итд то кликать ручками приходится ну очень редко

Ой не факт.
Разобраться в хитросплетениях большого числа слоев, наборов слоев и иерархий МНОГОСЛОЙНЫХ блоков ой как не просто. Даже самому разработчику. Чего уж говорить про посторонних людей, которые будут разбираться в Вашем чертеже. Они будут вспоминать Вас добрым матерным словом.
Просто я пробовал лет 10 назад упорно идти таким путём. Поэтому знаю о чём говорю
А потом, критерии выделения постоянно "дышат", меняются, поэтому модель с жесткой сортировкой/иерархией/"раскладыванием по полочкам" не отражает объективную реальность.

----- добавлено через ~4 мин. -----

Сообщение от Сергей812 ну как то так на скорую руку

Это C# что ли?

[Сергей812]

Сообщение от Кондратий Тихонович Для этого, по видимому, в ЛИСП-коде нужно создавать какой-то динамический массив (или список) и заполнять его по мере выделения

точнее, запоминать разницу между всеми предыдущими состояниями списка и текущим выделенным набором.

Сообщение от Кондратий Тихонович Это C# что ли

да - под акад на нем пишу.

[Кондратий Тихонович]

Сообщение от Сергей812 под акад на нем пишу.

В 2010 шарп не поддерживается

[Сергей812]

Сообщение от Кондратий Тихонович В 2010 шарп не поддерживается

Честно, что ли? А может просто надо скачать любую бесплатную студию, создать там проект - библиотека, подключить три библиотеки из корневой папки вашей версии акада, вставить мой код и нажать кнопочку скомпилировать?

----- добавлено через 57 сек. -----
в 2010 даже две библиотеки всего подключить к проекту.