Добро пожаловать!

Войдите или зарегистрируйтесь сейчас!

Войти

Полезные программы от Philin (строительство). VBA

Тема в разделе "Autodesk", создана пользователем Philin, 20 ноя 2010.

  1. rome047

    Форумчанин

    Регистрация:
    27 июл 2011
    Сообщения:
    76
    Симпатии:
    6
    Адрес:
    Россия г.Калининград
    Ну не знаю, для меня именно такой вариант был бы удобней, можно чтобы префиксы проставлялись НК(начало кривой), КК(конец кривой), НП(начало прямой), КП(конец прямой).
     
    #261
  2. Philin

    Форумчанин

    Регистрация:
    1 фев 2008
    Сообщения:
    2.557
    Симпатии:
    2.084
    Адрес:
    Москва
    А потом кто будет объяснять тахеометру при загрузке в него данных, что знаки кириллицы это правильно? Да он на первой строке при приёме таких точек выдаст ERROR и откажется принимать.

    Да и автокад переклинит на НК и КК. Алгоритм построения дуг у него такой. Там у них функция, которая может строить кривые ТОЛЬКО ПРОТИВ ЧАСОВОЙ СТРЕЛКИ. Ему не важно, что у вас трасса, он всё равно все кривые так начертит и начало может оказаться в конце. Даже если вы якобы строите кривую по часовой стрелке, всё равно автокад начертит её против часовой.

    PS Не первый раз это пишу. При разработке программ стараюсь упростить решение задач и минимизировать затраты времени на их выполнение. Я мог бы в aCAD2TXT встроить запрос пользователю имени файлов или ещё какую-нибудь лабуду... Только вот сейчас вы получите каталог координат за 2-5 секунд, а если наворотить десяток левых функций, то на это уйдёт 5 минут.

    Если встраивается какая-то дополнительная функция в программу, то она должна соответствовать минимуму требований:
    - работа программы с этой функцией не должна быть медленнее чем без неё, если затраты времени при её работе слишком велики, то проще это сделать вручную стандартными средствами автокад, а не пихать её в программу
    - если функция отсутствует в автокад, то допускается её включение в программу даже если её работа значительно замедлит работу программы
    - если функция приведёт в непредсказуемому результату (например некоторые виды выбора объектов чертежа через VBA), то она не будет включена в программу (бывают исключения, но только при острой необходимости... потом придётся заниматься отловом глюков года три)
    - если функцию может полностью заменить стороннее ПО (например внутренний софт среднестатистического тахеометра), то не надо её вообще писать

    aCAD2TXT написана для создания файла координат каталога чертежа. Этот файл предусмотрен для передачи в тахеометр. Если среднестатистический тахеометр не в состоянии выполнять какие-то случаи разбивки, то это можно включить в программу.
    Разбивка дуг и окружностей встроена в программу потому что среднестатистический тахеометр не имеет таких функций, а если и имеет, то не всегда ими можно воспользоваться.
    Разбивка линии на отрезки присутствует ВО ВСЕХ тахеометрах, которые произведены за последние 15 лет. Зачем мне встраивать такую функцию (тратя своё время на разработку, тратя ВАШЕ время на ввод дополнительных параметров в программу для этой функции, увеличивая количество точек в базе (многие тахеометры при увеличении точек в памяти начинают тормозить)) только ради того что легко может сделать сам тахеометр? Причём разбивка разных линий на разные участки с выбором этих линий гораздо быстрее выполняется стандартными средствами самого автокад (только, опять же, непонятно для чего это надо? Тахеометр сам может разбить линию как требуется).

    Если кому-то потребуется брать со слоя чертежа: только линии, только полилинии, только точки и т.п., то это можно реализовать в программе.
    Если кому-то требуется чтобы программа в каталог заносила координаты других примитивов чертежа, то это тоже возможно сделать.
    Если...

    В общем... разглагольствую к тому, что... Программа должна быть:
    - быстрой
    - максимально простой интерфейс
    - минимум нажатий кнопок
    - максимально возможный результат
     
    #262
    Qvinto нравится это.
  3. rome047

    Форумчанин

    Регистрация:
    27 июл 2011
    Сообщения:
    76
    Симпатии:
    6
    Адрес:
    Россия г.Калининград
    Philin, Меня всё устраивает, я просто высказал своё мнение, не стоит усложнять. Спасибо.
     
    #263
  4. Pasha1988

    Форумчанин

    Регистрация:
    25 янв 2013
    Сообщения:
    29
    Симпатии:
    8
    Здравствуйте! Окно проги aCAD2TEXT появляется, но при запуске(нажатия "Поехали") в командной строке появляется "Ошибка при выполнении". CAD 2010, винда 7 ultimate x64.
     
    #264
  5. Philin

    Форумчанин

    Регистрация:
    1 фев 2008
    Сообщения:
    2.557
    Симпатии:
    2.084
    Адрес:
    Москва
    Здравствуйте.
    После появления ошибки в командной строке ищите файлы координат в папке с открытым файлом чертежа. Если там они отсутствуют, тогда читаем дальше мой ответ, если они там есть, то дальше не читаем.

    "Ошибка при выполнении" в командной строке автокад ПОСЛЕ работы программы это не глюк и не ошибка, а шутка такая :) Уберу её, когда надоест :)



    версия программы какая? Автокад запускается с правами администратора?
    Количество точек на слое чертежа не превышает 20000?

    Если версия бета 7 и точек меньше 20000, то желательно увидеть файл на котором выдаёт ошибку.
     
    #265
  6. Pasha1988

    Форумчанин

    Регистрация:
    25 янв 2013
    Сообщения:
    29
    Симпатии:
    8
    Большое спасибо за ответ. Разобрался. Все работает корректно. Просто смутила эта надпись в комстроке) Шутка удалась)
     
    #266
  7. Philin

    Форумчанин

    Регистрация:
    1 фев 2008
    Сообщения:
    2.557
    Симпатии:
    2.084
    Адрес:
    Москва
    Новая версия программы aCAD2TXT ver.Beta8 (программа создания файлов (SDR и TXT) каталогов координат полилиний с отступом или полилиний и прочих примитивов автокад без отступа)

    В связи с тем, что пользователи программы ленятся читать инструкцию и не могут потом найти созданные файлы координат (2 случая за неделю это много ::cool24.gif::)...

    Добавление:
    - если программа создала файлы каталогов координат, то после этого она долго и нудно вам объясняет куда она их спрятала

    Вот так она это делает:
    [​IMG]

    Если вам также лень читать инструкцию пользователя Windows, то тогда можете долго и нудно водить курсором мыши по экрану, ловить кнопку ОК и жать на этой кнопке левую клавишу мыши. Если же вы читали инструкцию пользователя и справку Windows, то вам придётся быстро жать на клавиатуре клавишу ПРОБЕЛ или Enter чтобы избавиться от этого нудного сообщения программы aCAD2TXT.

    PS даже если вы очень долго и нудно будете водить курсором мыши, то сообщение [​IMG] всё равно появится после того как завершится работа программы.
    PPS Программа удалена в связи с её перемещением в раздел форума "Ресурсы". Теперь новые версии программы можно скачать только там.
     
    #267
    Последнее редактирование: 1 дек 2013
  8. favor1te1984

    Форумчанин

    Регистрация:
    31 мар 2012
    Сообщения:
    25
    Симпатии:
    0
    Здравствуйте, прошу помощи!
    AxeAndPointZ.dvb!AxeAndPointZ.StartProgram Ошибка при выполнении,
    Макрос выглядит следующим образом: ^C^C_-vbarun AxeAndPointZ.dvb!AxeAndPointZ.StartProgram (брал с файла адаптации), автокад версии 2014 цивил 3д, на всех предыдущих версиях все работает нормально, не работают только команды AxeAndPointZ и Razvorot. Как быть? система вин7 64
     
    #268
  9. Philin

    Форумчанин

    Регистрация:
    1 фев 2008
    Сообщения:
    2.557
    Симпатии:
    2.084
    Адрес:
    Москва
    Вроде всё верно - ^C^C_-vbarun AxeAndPointZ.dvb!AxeAndPointZ.StartProgram
    Ошибку выдаёт сразу при запуске? Автокад запускается с правами администратора?
    Файл адаптации был создан в акад 2008 и проверен на акад 2012 x32 и x64
    Можно попробовать прописать макрос вручную по инструкции, может что изменится. Вообще программы не предполагалось запускать в цивиле, у меня это даже проверить негде т.к. цивила нет и не планируется его приобретение.

    На крайний случай можно попробовать вот эту версию AxeAndPointZ 4.5 (вдруг заработает). Это новая версия программы, но я не планировал её выкладывать, пишу уже версию 4.6 и она будет выложена.

    PS Ещё можно поэкспериментировать со знаками "_", "-", "_-" между ^C^C и vbarun
    PPS Программа удалена в связи с не совсем корректной работой и значительным её несоответствием инструкции пользователя.
     
    #269
  10. favor1te1984

    Форумчанин

    Регистрация:
    31 мар 2012
    Сообщения:
    25
    Симпатии:
    0
    Может быть дело в том, что путь установки был не стандартный? а именно закинул кад в корень диска С а не в програм файлс. Макросы конечно же писал пробовал все варианты. Перепробовал все, видимо придется обратно цивил 2013 ставить. Я думаю может проблема в VBA модуле?
    --- Сообщения объединены, 27 авг 2013, Оригинальное время сообщения: 27 авг 2013 ---
    попробовал запустить через сервис, получил вот что:

    Ошибка
    Microsoft Visual Basic for applications
    Compile error in hidden module: AxeAndPointZ
    This error commonly occurs when code is incompatible wit the version platform or architecture. ну и так далее, то есть это или разница ВБА модулей либо версий 13 и 14 кадов..
     
    #270
  11. Philin

    Форумчанин

    Регистрация:
    1 фев 2008
    Сообщения:
    2.557
    Симпатии:
    2.084
    Адрес:
    Москва
    VBA Enabler устанавливается автоматически и рассчитывает что автокад находится в папке ProgramFiles. Возможно, что при установке автокад в другую папку... энаблер просто не может корректно прописать VBA в автокад. Ну и опять же - сивил... понятия не имею что в него понапихано и как оно будет взаимодействовать с программой.
     
    #271
  12. favor1te1984

    Форумчанин

    Регистрация:
    31 мар 2012
    Сообщения:
    25
    Симпатии:
    0
    Все ваши программы до единой работают во всех версиях цивила кроме 14, сейчас переустановлю в ПФ и отпишу
     
    #272
  13. favor1te1984

    Форумчанин

    Регистрация:
    31 мар 2012
    Сообщения:
    25
    Симпатии:
    0
    поставил в итоге 13 сивил все нормально работает. Уважаемый philin огромная просьба включить в последующие сборки возможность изменять т олщину стрелочки)
     
    #273
  14. Philin

    Форумчанин

    Регистрация:
    1 фев 2008
    Сообщения:
    2.557
    Симпатии:
    2.084
    Адрес:
    Москва
    А что не так с толщиной? Если увеличивать толщину линии стрелки, то при печати она начнёт сливаться с треугольником. Треугольник увеличивать нельзя т.к. он начнёт сливаться с текстом отклонений.
    Да и добавлять новый параметр ввода нежелательно, увеличится время ввода параметров.
     
    #274
  15. favor1te1984

    Форумчанин

    Регистрация:
    31 мар 2012
    Сообщения:
    25
    Симпатии:
    0
    я имел ввиду уменьшение толщины)
     
    #275
  16. Advent

    Регистрация:
    25 авг 2013
    Сообщения:
    3
    Симпатии:
    0
    Адрес:
    Калужская Обл. Г. Боровск
    --- Сообщения объединены, 28 авг 2013, Оригинальное время сообщения: 28 авг 2013 ---
    Подскажите, у меня проблема с понимание это программы IspoRand ver.0.5. Я все делаю по инструкции но у меня Н в квадрате а В нету в чем Моя ошибка.
     
    #276
  17. favor1te1984

    Форумчанин

    Регистрация:
    31 мар 2012
    Сообщения:
    25
    Симпатии:
    0
    нельзя чтобы отклонения низа и верха были в одном слое). Ты видимо вручную правил что-то.
     
    #277
  18. Philin

    Форумчанин

    Регистрация:
    1 фев 2008
    Сообщения:
    2.557
    Симпатии:
    2.084
    Адрес:
    Москва
    Что-то не пойму. Про какую программу идёт речь? Программа IspoRand (текущая последняя версия не 0.5, а 0.6) создана для подгона существующей исполнительной съёмки под допуски и квадраты она не рисует.
    Если подразумевается AxeAndPointz (программа для рисования плановой исполнительной съёмки), то тоже непонятно...
    Что не так?
    - значения Н рисуются в квадрате, а значения В рисуются без квадрата? - такого не может быть, если программа рисует квадраты для В, то она их рисует и для Н.
    - рисуются только значения Н, они в квадрате, а значения В вообще не рисуются? - такое может быть если съёмка загружена в автокад в плоском виде (все высоты на нуле или на другой общей отметке) и программа не может различить где тут верх, а где низ. Или может быть Вы неверно задали высоту относительно которой программа определяет В и Н. Или все ваши точки находятся идеально друг над другом и программа захватывает только нижние, а верхние не видит.

    Тихий ужас.. неужели нельзя было нормально сформулировать вопрос? Я понятия не имею что отвечать.

    PS В вопросе надо указывать имя и номер версии программы. Обновления производятся достаточно часто.
    PPS Ну ещё и цитата зачем-то огромная. Которая не вносит ясность, а только путает.
     
    #278
  19. geoandmar

    Форумчанин

    Регистрация:
    27 июн 2010
    Сообщения:
    42
    Симпатии:
    18
    Адрес:
    питер-москва
    favor1te1984
    коллеги пользовали на 11 цивеле, win7 64 бит, проги из сборки "soft4" и было это в 11-12 году
     
    #279
  20. favor1te1984

    Форумчанин

    Регистрация:
    31 мар 2012
    Сообщения:
    25
    Симпатии:
    0
    Он имеет ввиду что после использования программы IspoRand у него пропадает либо индекс В либо индекс Н.
    --- Сообщения объединены, 30 авг 2013, Оригинальное время сообщения: 30 авг 2013 ---
    Работает на любом каде кроме 14, сейчас юзаю полный пакет от Philin на 13 сивиле
     
    #280

Поделиться этой страницей

  1. Этот сайт использует файлы cookie. Продолжая пользоваться данным сайтом, Вы соглашаетесь на использование нами Ваших файлов cookie.
    Скрыть объявление