[hwd]

Исходные данные
Создана палитра инструментов и наполнена содержимым. Каждый элемент на вкладке палитры ссылается на некоторый файл, содержащий в своём составе нужный блок. Этот блок и будет вставлен в чертёж при активации данного элемента палитры. Все файлы-источники (используемые элементами палитры) размещены в определённом каталоге сети или его подкаталогах.

Определение проблемы
В свойствах элементов, расположенных на вкладках палитры, пути к файлам-источникам указаны абсолютными. В случае, если потребуется переместить каталог файлов-источников, в др. место - палитра инструментов перестанет работать, не найдя нужную информацию.
Придётся вручную изменять свойства для каждого элемента, входящего в состав палитры, указывая новый путь к файлу. Если таких элементов много - данный процесс займёт много времени.
Требуется свести к минимуму количество операций, необходимых для того, чтобы после перемещения каталога, содержащего файлы данных, палитра инструментов продолжала работать.

Общая схема решения
Нужна возможность указания в свойствах элемента, размещённого на вкладке палитры, относительного пути к файлу, а так же возможность использования пользовательских и системных переменных.

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

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

Вопрос
Кто-нибудь уже решал данную проблему? Если да, то как?

P.S. Попытка решения программным путём рассматривается как крайний случай, если другим способом не удастся.

Далее... Палитру инструментов можно экспортировать в xpg-файл. Содержимое файла представлено в формате XML.
Открываю файл и смотрю:

Код:

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

<ToolPaletteGroupExport>
  <ToolPaletteGroups>
    <ToolPaletteGroup>
      <Name>Оформление</Name>
      <CustomData />
      <ActivePaletteIndex>0</ActivePaletteIndex>
      <Contents>
        <ToolPalette ID="{6D067168-1D89-4567-87C6-D22CAC068AE3}" />
        <ToolPalette ID="{5A4F6403-D585-4B27-A261-8D22C2CCCC69}" />
      </Contents>
    </ToolPaletteGroup>
  </ToolPaletteGroups>
</ToolPaletteGroupExport>

Как видим, в файле представлены идентификаторы (GUID) вкладок палитры инструментов. Возможно удастся внести изменения в файл, содержащий описание вкладок палитр.
Какой файл содержит информацию по данным идентификаторам? Сначала подумал, что данные могут храниться в реестре (от Autodesk этого вполне можно ожидать). Однако поиск не дал результата. Тогда задал в проводнике поиск по содержимому файлов, указав один из GUID - результат поиска пока так же нулевой (продолжает искать).

[ытя]

Сообщение от hwd Придётся вручную изменять свойства для каждого элемента, входящего в состав палитры, указывая новый путь к файлу. Если таких элементов много - данный процесс займёт много времени. Требуется свести к минимуму количество операций, необходимых для того, чтобы после перемещения каталога, содержащего файлы данных, палитра инструментов продолжала работать.

Если не использовать "Общая схема решения...", то открываем файл(ы) палитры (лежат в C:\Documents and Settings\user\Application Data\Autodesk\AutoCAD XXXX\...\Support\ToolPalette\Palettes) в текстовом редакторе и с помощью поиска-замены скопом меняем на нужный путь.

[hwd]

Сообщение от ытя лежат в C:\Documents and Settings\user\Application Data\Autodesk\AutoCAD XXXX\...\Support\ToolPalette\Palettes.

Спасибо

[kheylan]

hwd
Удобно редактировать пути к блоку в палитре с помощью редактора XML NOTEPAD, который прилагаю, но нужно редактировать файлы *.atc в папке ...\ToolPalette\Palettes\*.atc
Путь в редакторе к блоку находится Palette>Tools>Tool>Data>Block>SourceFile

[hwd]

Сообщение от kheylan hwd Удобно редактировать пути к блоку в палитре с помощью редактора XML NOTEPAD, который прилагаю, но нужно редактировать файлы *.atc в папке ...\ToolPalette\Palettes\*.atc Путь в редакторе к блоку находится Palette>Tools>Tool>Data>Block>SourceFile

Спасибо, я знаю об этом редакторе, он у меня есть. )

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

Как видно из командной строки скрина - автокад убирает знаки процентов из пути...



Если поставить два процента, то получается правильная строка пути, но акад всё равно не видит файл. хотя всё тот же проводник эту строку ест нормально.

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

А если попытаться внутри AutoCAD выполнить (getenv "AcadCommonSettingsPath")?
По-моему, корректно будут браться только системные переменные, возвращаемые командой set в cmd (и то каждую проверить не помешает):

Код:

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

с:>set
ALLUSERSPROFILE
APPDATA
CLASSPATH
CommonProgramFiles
COMPUTERNAME
ComSpec
FP_NO_HOST_CHECK
HOMEDRIVE
HOMEPATH
LOGONSERVER
NUMBER_OF_PROCESSORS
OS
Path
PATHEXT
PROCESSOR_ARCHITECTURE
PROCESSOR_IDENTIFIER
PROCESSOR_LEVEL
PROCESSOR_REVISION
ProgramFiles
PROMPT
SystemDrive
SystemRoot
TEMP
TMP
USERDNSDOMAIN
USERDOMAIN
USERNAME
USERPROFILE
windir

Возможно, на каких-то конкретных машинах этот список будет отличаться.

[hwd]

Решение оказалось простым (спасибо Александру Ривилису за подсказку!):
В свойстве достаточно убрать путь к файлу, а в диалоговом окне Options, на вкладке Files добавить в категорию Support Search File Path путь к нужному каталогу. Всё работает безо всяких там системных переменных.
А изменить содержимое файлов, вырезав из них пути и оставив только имена можно так:

Код:

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

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Xml.Linq;
using System.IO;


namespace ConsoleApplication1
{
    class Program
    {
        static void Main(string[] args)
        {
            Console.WindowWidth = 180;
            //Каталог, в котором находятся файлы, подлежащие обработки
            DirectoryInfo dir = new DirectoryInfo(@"C:\Documents and Settings\andrey.bushman\Application Data\Autodesk\AutoCAD 2009\R17.2\enu\Support\ToolPalette\Palettes");
            //Правлю файлы
            ChangePath(dir, "xxx_");
            Console.Read();
        }

        /// <summary>
        /// Метод обрабатывает группу atc-файлов, удаляя в SourceFile пути к dwg-файлам, оставляя только их имена.
        /// </summary>
        /// <param name="dir">Каталог, в котором расположены искомые atc-файлы</param>
        /// <param name="prefixFilter">Префикс, с которого начинаются имена файлов, которые необходимо обработать</param>
        static void ChangePath(DirectoryInfo dir, string prefixFilter)
        {         
            if (!dir.Exists) return;            
            foreach (FileInfo fileFromList in dir.GetFiles(prefixFilter + "*.atc"))
            {
                if (!fileFromList.Name.StartsWith(prefixFilter)) continue;
                    XElement obj = XElement.Load(fileFromList.FullName);
                    Console.ForegroundColor = ConsoleColor.Green;
                    Console.WriteLine("Файл: {0}", fileFromList.FullName);
                    Console.ForegroundColor = ConsoleColor.Gray;
                    Console.WriteLine("Содержимое файла до внесения изменений:");                    
                    Console.WriteLine(obj);                    
                    Console.WriteLine("Изменяем содержимое...");
                    Console.WriteLine();
                    foreach (XElement item in obj.Element("Tools").Elements("Tool"))
                    {
                        if (!item.Element("Data").IsEmpty)
                        {
                            XElement fp = item.Element("Data").Element("Block").Element("SourceFile");
                            FileInfo dwgFile = new FileInfo(fp.Value);
                            fp.Value = dwgFile.Name;
                        }
                    }
                    Console.ForegroundColor = ConsoleColor.Red;
                    Console.WriteLine("Содержимое файла после внесения изменений:");
                    Console.ForegroundColor = ConsoleColor.Gray;
                    Console.WriteLine();
                    Console.WriteLine(obj);
                    obj.Save(fileFromList.FullName);
            }
        }
    }
}

[kheylan]

hwd
A как из этого кода сделать команду для удаления пути? Очень интересно.

[hwd]

Сообщение от kheylan hwd A как из этого кода сделать команду для удаления пути? Очень интересно.

это был общий код. для того, чтобы сделать из него консольное приложение, его следует слегка изменить. При желании можно по быстрому создать и GUI (WinForm или WPF), в котором заюзать этот метод, но имхо задача того не стоит. Я оформил в виде консольного приложения. Описание того, как им пользоваться прилагается в архиве.
Архив с "программкой" лежит здесь.

[Сергей Дубина]

Есть частный случай, в котором задача решается штатными средствами: если все блоки находятся в одном файле, то выбрав через шифт все элементы на палитре, правой кнопкой выбрать свойства объекта и поменять путь к файлу, для всех элементов сразу.

[hwd]

Сообщение от Сергей Дубина Есть частный случай, в котором задача решается штатными средствами: если все блоки находятся в одном файле, то выбрав через шифт все элементы на палитре, правой кнопкой выбрать свойства объекта и поменять путь к файлу, для всех элементов сразу.

У меня блоки находятся в разных файлах.