Дин.блоки+XML+LISP+Интернет= i-DRAW ( первая web палета инструментов) Опции

[gabrin]

Добрый день. Хочу выложить на суд свою разработку. Командой Gabrin.NET cоздан инструмент коллективной работы i-DRAW. Идея - единое оформление конструкторской документации людей удаленно работающих над одним проектом. Тестовые испытания проходят по адресу: i-Draw. Буду рад услышать любую критику по данному инструменту. В случае если имеются на этом форуме люди, занимающиеся организацией удаленного проектирования стучите в скайп ( gabrin.net ) буду рад обменяться опытом.

:!: Работает только под Internet Explorer

А вот Лисп, который открывает браузер на нужной странице.
Команда imain

Код

(defun c:imain()
(vl-load-com)
(setq objIEA (vlax-create-object "InternetExplorer.Application"))
(vlax-put-property objIEA "Toolbar" 0)
(vlax-put-property objIEA "StatusBar" 0)
(vlax-put-property objIEA "Width" 800)
(vlax-put-property objIEA "Height" 900)
(vlax-put-property objIEA "Left" 400)
(vlax-put-property objIEA "Top" 50)
(vlax-put-property objIEA "Visible" :vlax-true)
(vlax-invoke objIEA "Navigate" "http://bit.ly/7qLytp")

(while (/= 4 (vlax-get-property objIEA "ReadyState"))
(princ ".")
)
(setq
doc (vlax-get-property objIEA "Document")
body (vlax-get-property doc "Body")
)

)

[gabrin]

Добрый день. Хочу выложить на суд свою разработку. Командой Gabrin.NET cоздан инструмент коллективной работы i-DRAW. Идея - единое оформление конструкторской документации людей удаленно работающих над одним проектом. Тестовые испытания проходят по адресу: i-Draw. Буду рад услышать любую критику по данному инструменту. В случае если имеются на этом форуме люди, занимающиеся организацией удаленного проектирования стучите в скайп ( gabrin.net ) буду рад обменяться опытом.

:!: Работает только под Internet Explorer

А вот Лисп, который открывает браузер на нужной странице.
Команда imain

Код

(defun c:imain()
(vl-load-com)
(setq objIEA (vlax-create-object "InternetExplorer.Application"))
(vlax-put-property objIEA "Toolbar" 0)
(vlax-put-property objIEA "StatusBar" 0)
(vlax-put-property objIEA "Width" 800)
(vlax-put-property objIEA "Height" 900)
(vlax-put-property objIEA "Left" 400)
(vlax-put-property objIEA "Top" 50)
(vlax-put-property objIEA "Visible" :vlax-true)
(vlax-invoke objIEA "Navigate" "http://bit.ly/7qLytp")

(while (/= 4 (vlax-get-property objIEA "ReadyState"))
(princ ".")
)
(setq
doc (vlax-get-property objIEA "Document")
body (vlax-get-property doc "Body")
)

)

[gabrin]

Здравствуйте, хотел бы уточнить про систему в целом, что будет с файлами и скаченными блоками при отсутствии подключения к сети Интернет. И для чего служит гиперссылка при наведении курсора на блок? (гиперссылка на ресурс I-DRAW)

При отсутствии интернета с файлами вставленными в чертеж ничего не произойдет, т.к. они становятся частью чертежа. Гипперсылка - это не прихоть авторов, а издержуи системы. Сервис работает на основе технологии idrop от Autodesk, и гипперсылка вставляется автоматически (вставляется путь до файла в виде гипперссылки). Если мешает всегда можно в редакторе блока это подправить

[Гурман]

Всё, разобрался. Буду применять.
Глядишь тоже что-нибудь придумаю.

Спасибо вам за труды.

[gabrin]

Небольшой мануал по применению инструмента: http://www.youtube.com/watch?v=dkFor6pFztk

[shprot]

Небольшой мануал по применению инструмента: http://www.youtube.com/watch?v=dkFor6pFztk

Спасибо, было интересно (аудио ряд прикольный :-) )
Что обязательно нужно сделать.
1. Исключить манипуляции с вставкой блока и вставкой ссылки. Т.е. нужен макрос VBA или List выполняющий эти операции.
Т.е. сделали копию URL на сайте, перешли в AutoCAD, запустили макрос (нажали кнопку), и получили вставку блока.
2. На сайте сделать кнопку "Копировать URL".
Все это исключит монотонные манипуляции и увеличит скорость работы и добавит удобство.

[gabrin]

Спасибо, было интересно (аудио ряд прикольный :-) )
Что обязательно нужно сделать.
1. Исключить манипуляции с вставкой блока и вставкой ссылки. Т.е. нужен макрос VBA или List выполняющий эти операции.
Т.е. сделали копию URL на сайте, перешли в AutoCAD, запустили макрос (нажали кнопку), и получили вставку блока.
2. На сайте сделать кнопку "Копировать URL".
Все это исключит монотонные манипуляции и увеличит скорость работы и добавит удобство.

Все это будет. К сожалению знаний в области программирования под Акад не хватает.

[gabrin]

Небольшое обновление
1. Добавил страницу заточенную под автокад и WebMenu ( http://forum.dwg.ru/showthread.php?t=62138 )
2. Написал простенький Lisp вызова из командной строки приложения

Интуитивно все просто: грузим dll WebMenu -> грузим Lisp приложенный ниже -> набираем spds в командной строке -> кликаем на нужном блоке