24.02.2005 Прога для переноса данных из екселя и их обновления при изменении. + еще кое-что
Программа предназначена для переноса данных из екселя в автокад. Так же позволяет при изменении значений в екселе, изменять соответствующие значения в каде (подробней см. мануал)
Для установки необходим тока Setup.exe. Инсталяшка добавляет в папку, указанную при установке, vlx приложение MyExpress.vlx, менюшный файл MEmenu.mnu, загрузчик меню MenuLoader.mnl, 5 блоков для создания щита и пишет пару строк в файл acad200?.lsp.
Добавил еще пару функций:
- mass_purge - чистка (Purge) всех файлов в указанной директории(бага - удаляет размерные слои)
- Substitution - вылавливает в блоке текстовые строки(которые входят в блок не как атрибуты) и меняет
на введенные из консоли (удобно при переводе иноязычных чертежей)
- Write to file - Просит выбрать строки в чертеже, а затем записывает их в файл (мож кому пригодится)
- Create pannel - создает однолинейную схему щита по стандартам моего предприятия. пример таблицы екселя прилагается.
Дополнения от 7.02.05:
Пустые ячейки екселя делаются невидимыми в акаде - сделано по просьбам телезрителей. Теперь можно резервировать пустые ячейки для добавления позиций (становятся видимыми автоматически если в них что-нить внести).
Доп. ф-ции:
- hide Спрятать все пустые строки
- unhide Показать скрытые пустые строки (для удобства формирования таблицы в акаде)
Дополнения от 24.02.2005:
- Автоматическое открытие файла екселя и автоматическое обновление
Для установки необходим тока Setup.exe. Инсталяшка добавляет в папку, указанную при установке, vlx приложение MyExpress.vlx, менюшный файл MEmenu.mnu, загрузчик меню MenuLoader.mnl, 5 блоков для создания щита и пишет пару строк в файл acad200?.lsp.
Добавил еще пару функций:
- mass_purge - чистка (Purge) всех файлов в указанной директории(бага - удаляет размерные слои)
- Substitution - вылавливает в блоке текстовые строки(которые входят в блок не как атрибуты) и меняет
на введенные из консоли (удобно при переводе иноязычных чертежей)
- Write to file - Просит выбрать строки в чертеже, а затем записывает их в файл (мож кому пригодится)
- Create pannel - создает однолинейную схему щита по стандартам моего предприятия. пример таблицы екселя прилагается.
Дополнения от 7.02.05:
Пустые ячейки екселя делаются невидимыми в акаде - сделано по просьбам телезрителей. Теперь можно резервировать пустые ячейки для добавления позиций (становятся видимыми автоматически если в них что-нить внести).
Доп. ф-ции:
- hide Спрятать все пустые строки
- unhide Показать скрытые пустые строки (для удобства формирования таблицы в акаде)
Дополнения от 24.02.2005:
- Автоматическое открытие файла екселя и автоматическое обновление
Комментарии
Авторизоваться
А насчет перемены строк как - прикажете в программе отличать перемену строк местами от изменения значения в соответствующих ячейках. Я здесь только один выход вижу - считать определитель эквивалентной таблице матрицы, состоящей из ASCII кодов составляющих ее символов, причем хранить его в реестре в неявном виде ибо матрица в подавляющем большинстве случаев окажется прямоугольной.
Насчет позиций. Добавление позиций очень необходимая вещь - потомучто иногда что-то добавить или просто добавлять позиции на чертеж постепенно.
А зачем вообще лезть в другую спецификацию!!!
вопрос - как сделать так, что бы результат действия программы было удобно заносить в таблици? Дело в том, что может просто я чего не нашёл, однако, если таблица большая получается довольно таки большой масив текстовых объектов, которые надо вставить в поля таблици. Размер строк в стандартных таблицах обычно 8 мм. Я так понял, что программа расставляет тексты по строкам с интрвалом равным высота текста умножить на 1.5 Дробную высоту не принимает. как получить интревал между строчками 8 мм?
"(- (cadr tabble_insertion_point) (* 1.5 (1- (car item)) text_hight))" на
"(- (cadr tabble_insertion_point) (* 8 (1- (car item))))"
и ниже после комента ";;расчет высоты текста" вместо переменной text_hight поставьте нужную Вам высоту текста (не больше 8 :-).
2. Скиньте Head.lsp в папку support.
3. Откройте в папке support Акада файл acad????.lsp где вместо ???? у вас будет написана версия акада и последней строчкой в нем напишите (load "Head.lsp").
Будут вопросы пишите на hapk215@yandex.ru. Удачи.
Помогите коллеге-электрику...
Нужно зайти в tools->customize->menus и там на вкладке MenuBar добавить ее к существующим пунктам.