[protorgovec]

Добрый день форумчане. Подскажите пожалуйста. почему при переходе в другой документ у меня программа не хочет определять переменную. При работе в первом документе он видит эту переменную. После я ее загоняю во внедокументное пространство. Перехожу на другой документ. Он эту переменную определяет. Выполняет дальше команды. Но не подставляет эту переменную Пишет nil. Попытался считать эту переменную из внедокументного пространства присвоив ей новую переменную, но он ее все равно не определяет. Подскажите что не так, очень очень надо понять как забрать переменную для работы в новом документе.

Код:

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

 (vl-mkdir "d:\\Дима\\Деталь")
(setq D (getint "\n Введите диаметр колонны D >: "))
(vl-propagate 'D)
(command "_.-view" "_top")
(command "_.-view" "_swiso")
(command "_.cylinder" "0,0,0" D 10 )
(command "_.-view" "_swiso")
(setq 1kolco (entlast))
(command "_.-wblock" "d:\\Дима\\Деталь\\Кольцо.dwg" 1kolco "0,0,0" 1kolco "")
(command "_.-xref" "" "d:\\Дима\\Деталь\\Кольцо.dwg" "0,0,0" "" "" "")
(command "_sdi" 1)
(setq Ch1 (command "_open" "_no" "d:\\Дима\\Деталь\\Опорные элементы.dwg" "d:\\Дима\\Деталь\\Кольцо.dwg"))
(command "_sdi" 0)
(command "_layout" "_template"  "d:\\Дима\\A4v-1.dwt" "A4")
(command "_layout" "_delete" "Лист1")
(command "_layout" "_set" "A4")
(command "_mspace" "_view" "_left")
(command "_zoom" "_scale" "1/1xp")
(command "_pspace")
(command "_layout" "_set" "Модель")
(command "_.-view" "_left")
(setq w1 (vl-bb-ref 'D))
(setq tm1 (list (- w1) 0 0))

Прикладываю так же мой шаблон формата. Правда он в dwg, в dwt не принемает. Но думаю пересохранить его в dwt сможете. Так же создайте на диске D папку Дима. Я нашел только как создавать папку первой степени.
Надеюсь мне кто нибудь поможет.

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

ИЩи обсуждения с DENBASS2004 - там много было по этому поводу. Повторяться не хочу.

[protorgovec]

Сообщение от Кулик Алексей aka kpblc ИЩи обсуждения с DENBASS2004 - там много было по этому поводу. Повторяться не хочу.

Это я читал. Читал что при активации другого файла, он теряет переменные, но во внедокументном пространстве они же храняться? А раз они там есть, я думал можно их от туда вытащить. Да, проблемка судя по всему не поддающаяся решению. Жаль. Спасибо Алексей что проигнорировали мой предыдущий вопрос. Я интересовался у вас по поводу работы с неактивным документом. Но так и не дождался короткого ответа да или нет.

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

Сообщение от Кулик Алексей aka kpblc ИЩи обсуждения с DENBASS2004 - там много было по этому поводу. Повторяться не хочу.

а для чего тогда команда в лиспе существует vl-bb-ref, она вроде и отвечает за то что бы вытащить переменную из внедокументного пространства. Если работать в одном документе, тогда какой от нее смысл? ведь и без нее все спокойно делается. В каком тогда случае ее можно применять?

[roaa]

(vl-propagate 'D) - копирование значения D
(vl-bb-ref 'D) - каким боком? без использования (vl-bb-set 'D (getint "\n Введите диаметр колонны D >: "))
читайте Полещука внимательней!!!
в вашем случае (setq w1 D)

[gomer]

Сообщение от Кулик Алексей aka kpblc ИЩи обсуждения с DENBASS2004

Сдается мне это 2 одних и тех же человека
Offtop: Не относитесь с пристрастием к начинающим программистам

[protorgovec]

Сообщение от gomer Сдается мне это 2 одних и тех же человека

Конечно одни и те же. Мы вместе работаем, и вместе пытаемся что нибудь написать. Он уже плюнул на это все. Я почитал его сообщения, и от части понимаю почему плюнул. Ну не знает человек как сделать элементарные вещи, вы бы могли и подсказать, но не так как вы это делаете, а доступным языком. Из доступного языка было только понятно что читай книги. Ну не грамотные мы, не все можем объяснить и не все можем сделать. Я вот только только недели 1,5 как вообще узнал о существовании лиспа. А вообще, ребята, я нашел решение на то, как работать со множеством документов. И это не работа с неактивными документами. Каждый открывающийся становиться активным. И все в нем определяется, все переменные! Ответ оказался очень прост, и вы, как люди с опытом могли бы подсказать как это делается, не программу прислать, а в словах объяснить как структурно подойти к данному решению. А решение оказалось очень простым.По крайней мере для того, что нам нужно было добиться.

[gomer]

Сообщение от protorgovec Конечно одни и те же. Мы вместе работаем, и вместе пытаемся что нибудь написать. Он уже плюнул на это все. Я почитал его сообщения, и от части понимаю почему плюнул. Ну не знает человек как сделать элементарные вещи, вы бы могли и подсказать, но не так как вы это делаете, а доступным языком. Из доступного языка было только понятно что читай книги. Ну не грамотные мы, не все можем объяснить и не все можем сделать. Я вот только только недели 1,5 как вообще узнал о существовании лиспа. А вообще, ребята, я нашел решение на то, как работать со множеством документов. И это не работа с неактивными документами. Каждый открывающийся становиться активным. И все в нем определяется, все переменные! Ответ оказался очень прост, и вы, как люди с опытом могли бы подсказать как это делается, не программу прислать, а в словах объяснить как структурно подойти к данному решению. А решение оказалось очень простым.По крайней мере для того, что нам нужно было добиться.

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

[protorgovec]

Сообщение от gomer То чем вы занимаетесь было популярно лет 20 назад... а потом появился .Net и все, проблема решилась... так что не ищите здесь спецов по танцам с бубном, они вымерли, как динозавры

хорошо ,я вас услышал. Значит нет тут спецов по Autolisp-у жаль, а я думал что их тут много

[Psyakrev]

Вам же уже ответил roaa - нужно заменить (vl-propagate 'D) на (vl-bb-set 'D D) либо (setq w1 (vl-bb-ref 'D)) на (setq w1 D).
vl-propagate пишет в пространство имен документа, vl-bb-set - в внедокументное, соответственно и считывать в обоих случаях нужно по разному.

[trir]

Как правильно задавать вопросы в технических форумах

Мы, без сомнения, неприязненно относимся к людям, предположительно не желающим подумать или поучиться прежде, чем задавать вопросы. Такие люди убивают время — они берут, ничего не давая взамен, они отнимают время, которое мы могли бы посвятить другому вопросу, более интересному, и другому человеку, более достойному ответа. Таких людей мы называем "неудачниками" ("losers") (по историческим причинам это слово иногда пишется как "lusers" - пользователи-неудачники).

[roaa]

Сообщение от protorgovec А вообще, ребята, я нашел решение на то, как работать со множеством документов.

Столько раз уже обсуждалось на форуме... Стоило бы их сначала почитать, а потом плодить вопрос.

[protorgovec]

Сообщение от trir Мы, без сомнения, неприязненно относимся к людям, предположительно не желающим подумать или поучиться прежде, чем задавать вопросы. Такие люди убивают время — они берут, ничего не давая взамен, они отнимают время, которое мы могли бы посвятить другому вопросу, более интересному, и другому человеку, более достойному ответа. Таких людей мы называем "неудачниками" ("losers") (по историческим причинам это слово иногда пишется как "lusers" - пользователи-неудачники).

Ох ты, как громко сказано. Даже не знаю, то ли просто улыбнуться, то ли заржать на весь дом Ладно, скажу просто к неудачникам меня очень проблематично отнести. Просто решил помочь своей фирме автоматизировать работу хоть частично. Решил начать с того что я делаю, так как мне это знакомо. А дальше помогать другим отделам ускорять их работу. Ведь это все таки прибыль и от части моя. А в своем решение я нашел такой вариант. Решил не бодаться с одним лиспом, решил его разбить. Уж ладно ткну по кнопочке не 1 раз, а 3 В первом я буду заводить все данные которые для меня необходимы и загонять их во вне документное пространство как раз с помощью vl-bb-set . Во втором я буду вытаскивать их с помощью vl-bb-ref и вычислять все необходимые мне данные по формулам. А в третьем пропишу vl-load-all и все. Сколько бы я не открыл программно файлов везде будут все мои необходимые переменные Просто надо было меня подтолкнуть что 1 не обойтись лиспом Я не просил мне рыбу дать ,я просто просил у вас удочку

[trir]

просто посмотри

[roaa]

Сообщение от protorgovec Просто надо было меня подтолкнуть что 1 не обойтись лиспом

Вам же этого никто не говорил. Для поиска - пакетная обработка файлов. Экий Вы тяжелый.

[protorgovec]

Сообщение от trir просто посмотри

Посмотрел, может конечно это и круто, но для меня уж прости это было непонятно. Я с геологией не состыковываюсь, у меня иное направление. Но спасибо за видео. Да и делалось там не программно.

[trir]

всё там программно, геологическая модель загружается из xml-файла и редактируется - всё с помощью кода на VB.NET. Как раз в начале создаются солиды по данным из файла (он уже загружен), а после редактируются из формы - вот ещё посмотри

[protorgovec]

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

[trir]

то что вы приводили с DENBASS2004, это нифига не код, просто скрипты. Скрипты конечно это хорошо, но в своих границах.

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

На autolisp.ru я рассказывал и про стили программирования, и про особенности использования командных методов, и про работу с неактивным документом. И, по-моему, даже коды приводил. Еще раз все здесь дублировать я не согласный. Заниматься поиском мне тупо некогда. Повторяться в энный раз я не хочу.
Помимо этого, есть масса книг и сайтов, где все уже показано и рассказано не раз и не два.

[gomer]

Сообщение от trir то что вы приводили с DENBASS2004, это нифига не код, просто скрипты.

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