[SNIIP]

суть в теме. нужно из delphi выполнить lsp файл в автокаде. как отключить диалоговое окно загрузки/выгрузки приложения? filedia не помогает. она на него не действует.. что делать?

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

Во-первых, есть еще cmddia. Во-вторых, можно выполнить конструкцию наподобие

Код:

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

AcadApplication.ActiveDocument.SendCommand("load " + chr(34) + <ИмяФайла.lsp> + chr(34) + chr(13))

Хотя что можно сделать Lisp'ом и нельзя Deplhi - я не знаю.

[SNIIP]

ну что ж... во первых cmddia не отключает это окно...
во вторых load... такой команды автокад вообще не знает говорит..
если сделать _load то требует файл .shx а мне нужен lsp... f tuj dspsdftn команда... appload
а у этой команды диалоговое окошко не отключается...((

[ShaggyDoc]

Сообщение от SNIIP ну что ж... во первых cmddia не отключает это окно... во вторых load... такой команды автокад вообще не знает говорит.. если сделать _load то требует файл .shx а мне нужен lsp... f tuj dspsdftn команда... appload а у этой команды диалоговое окошко не отключается...((

Не болтайте ерундой, а изучайте AutoCAD. Особенно если пытаетесь программировать.

Команды load для загрузки LISP нет. Зато есть функция (load full_name_lsp msg). Именно этой функцией программисты и загружают приложения. Никаких диалоговых окон функция не пытается открывать.

В LISP вообще только функции используются - язык такой, функциональный.

Команда Appload предназначена для юзеров.

Кулик Алексей aka kpblc показал, что для загрузки LISP из Delphi (а также всяких бейсиков) надо использовать объектную модель AutoCAD и метод SendCommand, с помощью которого можно отправить в командную строку AutoCAD что угодно. Но отправлять надо не что взбредет, а то, что надо. Вот Алексей и показал, что надо отправить строку с LISP-выражением, вызывающим функцию (load .....) с аргументами.

Изучайте объектную модель AutoCAD (файл acadauto.chm). Из Delphi с AutoCAD можно работать только через объектную модель. И никак иначе.

[hwd]

Сообщение от ShaggyDoc а также всяких бейсиков

а так же всяких .net-языков...