Блог

Я хочу добавить интерактивности в 3D-графику Mathematica, отличную от Manipulate, которая классная, но имеет свои ограничения. Подумайте о четвертом примере демонстрации задачи о четырех кубах в Mathematica, щелчок по одному из кубов приводит к вращению куба.

Вопросы.

1. Возможно ли перехватить MouseEvents в Mathematica graphics (например, с использованием класса Java или иным образом?)

2. Или рекомендуется использовать Java, а затем вызывать Mathematica из Java?

3. Или (я надеюсь, что нет) разработка интерактивных графических программ выходит за рамки того, что нужно делать с Mathematica?

EventHandler можно использовать для отслеживания различных событий мыши (движение мыши вверх, мыши вниз, щелчок мыши, перетаскивание мыши). Используйте MousePosition для добавления некоторого интеллекта.

Пример:

 DynamicModule[{col1 = Green, col2 = Blue}, Graphics[
  {
   EventHandler[
    Dynamic[{col1, Disk[]}, 
     ImageSize -> 
      Tiny], {"MouseClicked" :> (col1 = 
        col1 /. {Red -> Green, Green -> Red})}],
   EventHandler[
    Dynamic[{col2, Disk[{1, 1}]}, 
     ImageSize -> 
      Tiny], {"MouseClicked" :> (col2 = 
        col2 /. {Blue -> Yellow, Yellow -> Blue})}]
   }
  ]
 ]
  

На кружочки можно нажимать независимо. Действие определяется для каждого объекта отдельно.

Удивительно, но это работает даже для 3D-графики:

 DynamicModule[{col1 = Green, col2 = Blue}, 
 Graphics3D[
  {
   EventHandler[
    Dynamic[{col1, Sphere[]}, 
     ImageSize -> 
      Tiny], {"MouseClicked" :> (col1 = 
        col1 /. {Red -> Green, Green -> Red})}], 
   EventHandler[
    Dynamic[{col2, Sphere[{1, 1, 1}]}, 
     ImageSize -> 
      Tiny], {"MouseClicked" :> (col2 = 
        col2 /. {Blue -> Yellow, Yellow -> Blue})}]
   }
  ]
 ]