Gets and sets if the menu text should be translated of the context menu item event. | |
Syntax: | Boolean =
object.TranslateMenuText object.TranslateMenuText = Boolean |
Description: | This property is only valid for events whose
Type is gefEventRBMenuItem Example: Sub GefObjectEvent_ContextMenuItem() Dim oCimObj As GefObject Dim oCimObjEvnts As
GefObjectEvents Dim oCimObjEvnt As
GefObjectEvent Set oCimObj = CimGetObject Set oCimObjEvnts =
oCimObj.Events Set oCimObjEvnt =
oCimObjEvnts.Item(0) If Not oCimObjEvnt Is Nothing
Then If oCimObjEvnt.Type =
gefEventRBMenuItem Then oCimObjEvnt.TranslateMenuText
= True End If End If End Sub |