• meisgreen
  • Восстановленный участник
  • На форуме с 28 ноября 2007г.
  • Сообщений: 3
  • Спасибо: 0

Тема: Возвращение значения в Dcl

Подкинули тут работы. С лиспом освоился, нужно вот менюшку сделать к программе. Значения вводимые в edit_box уже научился использовать. Возник такой вопрос, после выполнения программы как мне вывести цифру в поле edit_box, т.е. мне нужно вывести в dcl в поле edit_box количество отрезков которые я считаю через ((setq ss (ssget "_X" '((0 . "LINE"))))
        (setq i (sslength ss))
Вот значение i мне и нужно вывести. Подскажите пожалуйста!

  • Юрий
  • Восстановленный участник
  • На форуме с 10 апреля 2006г.
  • Сообщений: 178
  • Спасибо: 0

Re: Возвращение значения в Dcl

Достаточно просто.

(set_tile "code" (itoa (setq i (sslength ss)))
; code - код элемента диалога. В файле *.dcl определен как key="code"

  • meisgreen
  • Восстановленный участник
  • На форуме с 28 ноября 2007г.
  • Сообщений: 3
  • Спасибо: 0

Re: Возвращение значения в Dcl

постоянно выдает такую ошибку - error: malformed list on input

  • Юрий
  • Восстановленный участник
  • На форуме с 10 апреля 2006г.
  • Сообщений: 178
  • Спасибо: 0

Re: Возвращение значения в Dcl

Не хватает закрывающей скобки:

(set_tile "code" (itoa (setq i (sslength ss))))