diff --git a/src/button.cxx b/src/button.cxx
index 0f91649..6a7a43f 100644
--- a/src/button.cxx
+++ b/src/button.cxx
@@ -340,6 +340,9 @@ CButton::Detect (Point pos)
   if (m_bHide || !m_bEnable)
     return false;
 
+  if (IsRightReading ())
+    pos.x = LXIMAGE () - pos.x;
+
   if (m_nbMenu > 1 && m_bMouseDown) // sous-menu déroulé ?
     width += 2 + (m_dim.x - 1) * m_nbMenu;
 
diff --git a/src/event.cxx b/src/event.cxx
index 0da126c..ecd25fc 100644
--- a/src/event.cxx
+++ b/src/event.cxx
@@ -2989,6 +2989,9 @@ CEvent::EventButtons (const SDL_Event & event, Point pos)
   m_textToolTips[0] = 0;
   m_posToolTips.x   = -1;
 
+  if (IsRightReading ())
+    pos.x = LXIMAGE () - pos.x;
+
   if (m_phase == EV_PHASE_PLAY)
   {
     auto progress = [&](CJauge & prog, const char * text) -> bool {