• RIO
  • Восстановленный участник
  • На форуме с 22 августа 2004г.
  • Сообщений: 29
  • Спасибо: 0

Тема: Как можно узнать, что в текстовом поле находится курсор?

Подскажите плиз, как можно программно узнать что выбрано такое-то текстовое поле, т.е. там размещен курсор?

  • Стас
  • Восстановленный участник
  • На форуме с 26 марта 2004г.
  • Сообщений: 491
  • Спасибо: 0

Re: Как можно узнать, что в текстовом поле находится курсор?

А в целом то какая задача?

  • На форуме с 4 апреля 2002г.
  • Сообщений: 1,348
  • Спасибо: 0

Re: Как можно узнать, что в текстовом поле находится курсор?

По-моему, в фунции action_tile надо надо втыкать функцию, сигнализирующую чему-то, что в поле находиться курсор.
типа

(action_tile
    "q1"
    "(progn (im_q1 141)(im_q2 -15)(im_q3 -15)(im_q4 -15)
                           (im_q5 -15)(setq in_det  \"Up\") )"
  )

но это по рабоче-крестьянски

  • Стас
  • Восстановленный участник
  • На форуме с 26 марта 2004г.
  • Сообщений: 491
  • Спасибо: 0

Re: Как можно узнать, что в текстовом поле находится курсор?

Моё предложение:
Написать функцию проверки примерно такого вида:

(defun check:select (sel_key /)
(princ (strcat sel_key "\n"))
)

princ естественно заменить нужной обработкой значения sel_key
И  в  action_tile для всех нужных полей на первом месте запускать функцию check:select , передавая в неё $key

(action_tile "кей поля" "(check:select $key)")

Но думаю что и это по рабоче-крестьянски :)

  • RIO
  • Восстановленный участник
  • На форуме с 22 августа 2004г.
  • Сообщений: 29
  • Спасибо: 0

Re: Как можно узнать, что в текстовом поле находится курсор?

Спасибо всем завтра попробую