VBA. Как узнать габариты текстового примитива.
| Правила | Регистрация | Пользователи | Сообщения за день |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > VBA. Как узнать габариты текстового примитива.

VBA. Как узнать габариты текстового примитива.

Ответ
Поиск в этой теме
Непрочитано 05.03.2014, 00:12 #1
VBA. Как узнать габариты текстового примитива.
art_rrc
 
Минск
Регистрация: 28.01.2013
Сообщений: 375

Доброго времени суток. Подскажите пожалуйста, реально ли методами VBA определить габариты текста?

Перерыл интернет, решения есть, но про VBA нет ни слова... По крайней мере, мне не удалось ничего найти. Вот есть рабочий код ObjectARX: http://www.caduser.ru/forum/index.ph...6#message24556
LISP: http://www.caduser.ru/forum/index.ph...8#message47348
Получится ли решить эту задачу в VBA. Или нужно писать функцию в другом языке и вызывать ее из VBA?

ps Может быть кому-нибудь попадались на глаза что-то на подобие таблицы символов ISOCPEUR с указанием, какой символ сколько пикселей(или единиц чертежа) занимает? Поделитесь опытом пожалуйста...

Заранее спасибо!
Просмотров: 2730
 
Непрочитано 05.03.2014, 00:14
#2
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 40,450


http://autolisp.ru/2014/02/18/entities-bound/ не поможет?
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Автор темы   Непрочитано 05.03.2014, 00:31
#3
art_rrc


 
Регистрация: 28.01.2013
Минск
Сообщений: 375


Цитата:
Сообщение от Кулик Алексей aka kpblc Посмотреть сообщение
Спасибо за сверхоперативность. Но дело в том что, я только начинаю программировать, решил начать с VBA. И в 1м посте я пытался акцентировать свое внимание, что нужна именно VBA функция. А в вышеприведенной статье (если я правильно понял) речь идет о лисп функциях. Так что, наверняка эта информация пригодится, но не сейчас. Нужно немножко подрасти. И научиться использовать лисп-выражения из VBA программ, но на данный момент хочется решить задачу штатными методами.
На данный момент я использую вот такую империческую (не смейтесь) формулу:
L=<Количество символов> * 2 + 3

По большому счету, она меня устраивает процентов на 80%. Но, естественно, если в тексте много скобок или единиц или заглавных букв, то она начинает врать, а это не очень приятно. А хотелось бы получать всегда актуальное значение длины текста..
art_rrc вне форума  
 
Непрочитано 05.03.2014, 01:20
#4
Кулик Алексей aka kpblc
Moderator

LISP, C# (ACAD 200[9,12,13,14])
 
Регистрация: 25.08.2003
С.-Петербург
Сообщений: 40,450


GetBoundingBox спасет. Но только для текста, который повернут на 0°; ну и за компанию крайне желательно для текста иметь мировую систему координат. Или потом придется долго и упорно плясать с матрицами преобразований координат.
__________________
Моя библиотека lisp-функций
---
Обращение ко мне - на "ты".
Все, что сказано - личное мнение.
Кулик Алексей aka kpblc вне форума  
 
Автор темы   Непрочитано 05.03.2014, 19:31
#5
art_rrc


 
Регистрация: 28.01.2013
Минск
Сообщений: 375


Цитата:
Сообщение от Кулик Алексей aka kpblc Посмотреть сообщение
GetBoundingBox спасет. Но только для текста, который повернут на 0°; ну и за компанию крайне желательно для текста иметь мировую систему координат. Или потом придется долго и упорно плясать с матрицами преобразований координат.
Кулик Алексей aka kpblc, Большое спасибо, Вы как всегда на высоте!
Этот метод действительно спас. Сегодня применил его и все получилось, теперь работает как надо! Еще раз спасибо...
art_rrc вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > VBA. Как узнать габариты текстового примитива.



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите узнать номер строки в котрой произошла ошибка в программе на VBA МишаИнженер Программирование 3 27.05.2012 23:27
как можно узнать угол поворота одного примитива оносительно другого? Nelebog AutoCAD 19 11.08.2009 20:26