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

Понадобилось мне определить, находится ли некоторый файл в путях поддержки AutoCAD. В лиспе с этим просто - (findfile FileName) и вперед. В .NET я такого не нашел. Может, плохо искал?
Cейчас додуматься смог только до получения путей поддержки, разбора их в массив и последовательной проверки наличия файла. Мне такой подход не сильно нравится - приходится использовать Autodesk.AutoCAD.Interop. Подозреваю, что есть более простой способ. Если есть вариант решения - подскажите, пожалуйста (VB.NET или C#).
Использую VS2008 Standard Edition, dll пишется под AutoCAD 2008.
Спасибо.

[Pavlukas]

Посмотри, вроде так

Document doc =
Application.DocumentManager.MdiActiveDocument;

HostApplicationServices haser =
HostApplicationServices.Current;
string filepath =
haser.FindFile(fileName, doc.Database, FindFileHint.Default)

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

Спасибо! Вроде бы понял свою ошибку

[Pavlukas]

Алексей вот код, но без обработки на ошибку, если файл не найден
namespace FindFile
{
publicclassFindFile
{
[Autodesk.AutoCAD.Runtime.CommandMethod("FindFile")]
publicvoid PathFileFind()
{
Autodesk.AutoCAD.ApplicationServices.Document doc =
Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager.MdiActiveDocument;
Autodesk.AutoCAD.DatabaseServices.HostApplicationServices haser =
Autodesk.AutoCAD.DatabaseServices.HostApplicationServices.Current;
Autodesk.AutoCAD.EditorInput.Editor ed = Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager.MdiActiveDocument.Editor;
Autodesk.AutoCAD.EditorInput.PromptResult res1 = ed.GetString(" : ");
string path =
haser.FindFile(
res1.StringResult,
doc.Database,
Autodesk.AutoCAD.DatabaseServices.FindFileHint.Default
);
ed.WriteMessage(path);
}
}
}

[Александр Ривилис]

Существует. Вариантов как минимум два. Первый:

Код:

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

string filename; // Имя файла,  который мы будем искать в путях доступа
string fullpath = HostApplicationServices.Current.FindFile( 
         filename, HostApplicationServices.WorkingDatabase, 
         FindFileHint.Default);

Ну а второй - вызов acedFindFile через P/Invoke

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

Александр Ривилис, то есть второй вариант выполнять по аналогу с кодом Танзилло (DBUtils.cs)?

[Александр Ривилис]

Сообщение от Кулик Алексей aka kpblc Александр Ривилис, то есть второй вариант выполнять по аналогу с кодом Танзилло (DBUtils.cs)?

Да. Организовать вызов функции из соответствующей автокадовского dll-файла (в данном случае из acad.exe). Это общий принцип. Если чего-то нет в ObjectARX .NET, но есть в ObjectARX (без .NET) - нужно использовать P/Invoke

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

Понял, буду пробовать Спасибо
Pavlukas, благодарствую. Я сделал аналогично:

Код:

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

using System;

using Autodesk.AutoCAD.ApplicationServices;
using Autodesk.AutoCAD.DatabaseServices;

using AcDb = Autodesk.AutoCAD.DatabaseServices;

namespace test
{
  class FileOperations
  {
    public static string PathFindFile(string FileName, string DefaultValue)
    {
      string Result;
      Document doc = AcAp.Application.DocumentManager.MdiActiveDocument;
      try
      {
        Result = AcDb.HostApplicationServices.Current.FindFile(FileName, doc.Database, FindFileHint.Default);
      }
      catch (System.Exception ex)
      {
        Result = DefaultValue;
      }
      return Result;
    }

  }
}

Вроде работает...
P.S. Александр, я окончательно и бесповоротно запутался в импорте ObjectARX-функций Очень много сопутствующих вопросов возникло, а разобраться пока не смог.

[hwd]

Если в указанной версии AutoCAD используется .Net Framework версии не ниже 3.0, то ещё один способ такой (я так проверяю в AutoCAD 2009):

Код:

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

...
//AutoCAD namespaces
using acad = Autodesk.AutoCAD.ApplicationServices.Application;
...
/// <summary>
/// Метод определяет наличие файла в путях поддержки, прописанный в настройках AutoCAD.
/// </summary>
/// <param name="fileName">Имя искомого файла (вместе с указанием расширения)</param>
/// <returns>Если файл обнаружен - возвращается строковое представление каталога, в котором этот файл находится. Если файл не найден - возвращается null.</returns>
        private string FileExistsInAcadSupportDirectories(string fileName)
        {
            return acad.UserConfigurationManager.OpenCurrentProfile().OpenSubsection("General").ReadProperty("ACAD", string.Empty).ToString().Split(';').Where(n => n != string.Empty).FirstOrDefault(n => File.Exists(Path.Combine(n, fileName)));            
        }

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

Нда... До такой строки я точно додуматься не смогу еще очень долго.
Но за информацию спасибо

[Александр Ривилис]

Сообщение от hwd Если в указанной версии AutoCAD используется .Net Framework версии не ниже 3.0, то ещё один способ такой (я так проверяю в AutoCAD 2009):

Это не полный аналог (findfile), т.к. не проверяются:
1) текущий каталог;
2) каталог, содержащий текущий чертеж;
3) каталог содержащий acad.exe.

[hwd]

Сообщение от Александр Ривилис Это не полный аналог (findfile), т.к. не проверяются: 1) текущий каталог; 2) каталог, содержащий текущий чертеж; 3) каталог содержащий acad.exe.

проверки п.п. 2 и 3 можно без проблем добавить.
про п.1 не понял - "текущий каталог" чего? У меня только 2 варианта ответа, но они перечислены в п.п. 2 и 3.

[Александр Ривилис]

Сообщение от hwd проверки п.п. 2 и 3 можно без проблем добавить.

Конечно можно. Я просто уточнил, что приведенный код это не учитывает.

Сообщение от hwd про п.1 не понял - "текущий каталог" чего? У меня только 2 варианта ответа, но они перечислены в п.п. 2 и 3.

Текущий каталог в том смысле, в котором это подразумевает Windows. Обычно это то, что задано в поле "Рабочая папка" ярлыка AutoCAD, но программно может быть изменено.

[hwd]

Сообщение от Александр Ривилис Текущий каталог в том смысле, в котором это подразумевает Windows. Обычно это то, что задано в поле "Рабочая папка" ярлыка AutoCAD, но программно может быть изменено.

В какой последовательности происходит поиск?

предполагаю такую:
1. Каталог, в котором находится файл (если он уже сохранён).
2. каталог, в котором находится acad.exe
3. Рабочая папка
4. Последовательная проверка всех каталогов, прописанных в ветке реестра, которую я обрабатываю в своём коде.

прошу поправить меня, если ошибаюсь.

Крыс Нда... До такой строки я точно додуматься не смогу еще очень долго. Но за информацию спасибо

Настоятельно рекомендую это. Не пожалеешь ни разу...

[Александр Ривилис]

Сообщение от hwd В какой последовательности происходит поиск?

ObjectARX Reference говорит нам:

The current directory The directory that contains the current drawing file The directories named by the ACAD environment variable (if this variable has been specified) The directory that contains the AutoCAD program files

[hwd]

Сообщение от Александр Ривилис ObjectARX Reference говорит нам:

аке, спасибо

[hwd]

Сообщение от Александр Ривилис ObjectARX Reference говорит нам:

Вспомнил об этой теме, доработал код. Результат здесь. В указанном линке показано, как можно управлять каталогами поиска.