Context-Menü inaktivieren

[Klemens Klarhoelter]

Hi folks,

wie kann ich im Context Menü einzelne Menüpunkte inaktivieren?
Z.B. soll der Menüpunkt "Einsetzen" nur aktiv sein, wenn im Clipboard
Daten vorliegen.
Kennt jemand eine Lösung?

  dim item as string
  Dim c as New Clipboard
  
  item = hitItem.Text
  
  if strcomp(item, "Kopieren",0) = 0 then //v4.14.57
    
    If c.TextAvailable then
      c.Text = me.SelText
    End if
    c.close
    
  elseif strcomp(item, "Einsetzen",0) = 0 then //v4.15.01
    
    me.seltext = c.Text
    c.close
  end if

Gruß
Klemens