[Dies77_66]

Вопрос банальный где ето скачать можно!!!
надо чтоб создавались вот такие выноски и их модификации
[ATTACH]1146637262.dwg[/ATTACH]

[ki]

Доброго времени суток. Насчет рамок, если делать ее фиксир. размера, то нет смысла делать текст изменяемым. Прямоугольниками рисовать попробую. С выравниванием поиграюсь, посмотрю как лучше. Отступы у меня от линии снизу и от левого края одинаковые (каэф. расчитан), если сделать сжатие текста, то это не решит проблему того, что некоторые строки подчеркиваются больше (от ширины букв зависит, например I и M имеют разную ширину). Я еще не знаю как точно вычислить настоящую ширину любой строки.
Програмульку буду доводить до ума, сделаю ее с оконной менюшкой и ... в общем будем работать.

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

Для получения размера текста попробуй (textbox)
Для рамок фиксированного размера можно попробовать сделать однострочный текст, изменив ему выравнивание на fit. Потом посмотреть его коэффициент сжатия, и, если он > 1 (т.е. текст "растянут"), установить в 1. У меня похожим образом идет вставка фамилий в штамп

[DANZZ]

можно еще одно пожелание:
число марок тоже может быть не одну строчку, а в несколько, допустим 10 марок, значит их же не надо в одну строчку вбивать, а например в три (4, 4, 2)

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

Ну вы блин даете! Точно, аппетит приходит и далее по тексту. Я б уже задумывался о формировании диалогового окна, с формированием анонимного блока, в который засунуть все тексты и отрезки, и рисованием обычной выноски.

[ki]

Гы. Я уже об этом задумался.

[DANZZ]

подскажите какая функция округляет не целое число в большую сторону, например 3,2 = 4; 2,7 = 3 и т.п.

[VetalBY]

Сообщение от DANZZ подскажите какая функция округляет не целое число в большую сторону, например 3,2 = 4; 2,7 = 3 и т.п.

свою надо писать имхо, что-то такое:

Код:

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

(defun fix_v (a / b)
  (setq b (fix a))
  (if (= a b) b (1+ b))  
)

это только для положительных значений

[VVA]

Или так
взято с Alaspher №10

Код:

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

;|
*  Ф-ция округление числа 
*  аргументы: 
   num - само число 
   digit - кол-во знаков после зпт. 
* В качестве положительного свойства - принимает отрицательные значения округления
* (для этого и делалась): (pl:round 12345.67 -3) -> вернёт - 12000
* http://forum.dwg.ru/showthread.php?p=26859#post26859
* Alaspher №10
|;

(defun pl:round (num digit / fact) 
  (setq fact 1.0) 
  (repeat (abs digit) (setq fact (* 10 fact))) 
  (if (minusp digit) 
    (setq fact (/ 1.0 fact)) 
  ) 
  (setq num (/ (fix (+ (* num fact) 0.5)) fact)) 
  (if (> 1 digit) 
    (fix num) 
    num 
  ) 
)

Пример

Код:

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

(setq num 3.2)
(setq r_num (pl:round (+ num 0.4999) 0))

[DANZZ]

Вот почитал и на основе ваших кодов написал свой.
но есть ряд вопросов:
1. После ввода каждой строки или кабельной марки появляется сообщение "неизвестная команда "VNSK"" как это убрать?

2. Можно ли эту выноску сделать как самостоятельный объект, т.е чтоб можно было бы в любое время редактировать в каком нибудь диалоговом окне

[DANZZ]

Вот код
[ATTACH]1148436294.rar[/ATTACH]