[Leo_fmf]

Помогите пожалуйста, можно ли проверить название или путь к текущему профилю AutoCAD коммандами LISP или Delphi?
И можно ли программно изменить текущий профиль?

[KSI]

Переменная CPROFILE хранит текущий профиль.

(Только чтение)
Тип: Строка
Сохранен в: Реестр
Начальное значение: <<Unnamed Profile>>
Отображается имя текущего профиля.

[Leo_fmf]

эта переменная работает в коммандной строке AutoCAD, но можно ли ее проверить в "Консоль Visula LISP"?

[KSI]

Да, надо подумать. Хотя размещать тему надо было в разделе Программирование.

[Leo_fmf]

Спасибо за замечание. Я недавно на этом форуме, еще плохо ориентируюсь, где что писать

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

Перенесено.

[KSI]

(setq a (getvar "CPROFILE"))
У меня вернуло значение (имя текущего профиля) "AutoCAD"
Вылетело из головы, что системные переменные вытаскиваются по getvar.

[Сергей Богатов]

Сообщение от Leo_fmf Помогите пожалуйста, можно ли проверить название или путь к текущему профилю AutoCAD коммандами LISP или Delphi? И можно ли программно изменить текущий профиль?

А ты "Документация для разработчиков" читал? Там есть всё. В том числе примеры

например

Код:

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

Sub Example_ActiveProfile()
    ' This example returns the current setting of
    ' ActiveProfile.
    
    Dim preferences As AcadPreferences
    Dim currActiveProfile As String
    
    Set preferences = ThisDrawing.Application.preferences
    
    ' Retrieve the current ActiveProfile value
    currActiveProfile = preferences.Profiles.ActiveProfile
    MsgBox "The current value for ActiveProfile is " & currActiveProfile, vbInformation, "ActiveProfile Example"
End Sub

[Leo_fmf]

Спасибо за помощь!!!