Can :bRClickData coexist with :bPopUp on xBrowse?

[reinaldocrespo]

Hi.

I'm looking to execute a code block when rightclicking on a specific column, as in:

Code: Select all  Expand view

   WITH OBJECT ::oGrid
      :MedRec:bRClickData   := { || ::ChngMRec(), ::oGrid:Refresh(), ::oGrid:SetFocus() }
 

But for the rest of the columns I'd like to have a popup menu, as in:

Code: Select all  Expand view

   WITH OBJECT ::oGrid
      :bPopUp := { || ::ContextMenu() }
      :MedRec:bRClickData   := { || ::ChngMRec(), ::oGrid:Refresh(), ::oGrid:SetFocus() }
 

the problem is that :bPopUp takes precedence. Is it possible to have :bPopUp execute only when :bRclickData is NIL?


Reinaldo.

[nageswaragunupudi]

bPopup takes precedence over bRClickData. So for the same column, bRClickData does not work if bPopUp is defined.

For your requirement, you may assign the context menu block to all individual columns except the one for which you want bRClickData instead of to the browse object.

Code: Select all  Expand view

  WITH OBJECT ::oGrid
      :bPopUps := { || ::ContextMenu() }  // NOTE: bPopups NOT :bPopup
     
   WITH OBJECT :MedRec
      :bPopUp          := nil
      :bRClickData   := { || ::ChngMRec()
   END
END
 

[reinaldocrespo]

Mr. Rao;

Excellent suggestion.

Thank you,


Reinaldo.