DropDownMenuAction(item as toolitem, hitItem as MenuItem)

[Klemens Klarhoelter]

Hi folks,
mit "hitItem.checked = true" wird im Menu der ausgewählte Menuepunkt markiert.
Aber wie kann ich bei allen Menuepunkten den den Wert von Checked auf false 
setzen? Das gelingt mir nicht.
Klemens  

 

sub DropDownMenuAction(item as toolitem, hitItem as MenuItem)  
  if strcomp(hititem.Text, "Test1",0) = 0 then
    ....
    hitItem.Checked = true
    
  elseif strcomp(hititem.Text, "test2",0) = 0 then
   ....
   hitItem.Checked = true
 end if