Set Menu Status

Date: 02-16-2022

Return to Index

 
Sub SetMenuStatus
    Menu Set State hPopupSettings, ByCmd %IDM_Case, CaseSensitive * (%MFS_Checked Or %MFS_Enabled)
    Menu Set State hPopupSettings, ByCmd %IDM_AutoSpeak, AutoSpeak * (%MFS_Checked Or %MFS_Enabled)
    Menu Set State hPopupSettings, ByCmd %IDM_AutoClose, AutoClose * (%MFS_Checked Or %MFS_Enabled)
    Menu Set State hPopupSettings, ByCmd %IDM_NotifyEnd, NotifyEnd * (%MFS_Checked Or %MFS_Enabled)
 
    Menu Set State hPopupSettings, ByCmd %IDM_Numbers, 0
    Menu Set State hPopupSettings, ByCmd %IDM_Dollars, 0
    Select Case UnitType
       Case "Numbers"   : Menu Set State hPopupSettings, ByCmd %IDM_Numbers, %MFS_Checked Or %MFS_Enabled
       Case "Dollars"   : Menu Set State hPopupSettings, ByCmd %IDM_Dollars, %MFS_Checked Or %MFS_Enabled
    End Select
 
    Menu Set State hPopupSettings, ByCmd %IDM_0, 0
    Menu Set State hPopupSettings, ByCmd %IDM_2, 0
    Menu Set State hPopupSettings, ByCmd %IDM_4, 0
    Menu Set State hPopupSettings, ByCmd %IDM_6, 0
    Select Case Delay
       Case 0    :  Menu Set State hPopupSettings, ByCmd %IDM_0, %MFS_Checked Or %MFS_Enabled
       Case 2000 :  Menu Set State hPopupSettings, ByCmd %IDM_2, %MFS_Checked Or %MFS_Enabled
       Case 4000 :  Menu Set State hPopupSettings, ByCmd %IDM_4, %MFS_Checked Or %MFS_Enabled
       Case 6000 :  Menu Set State hPopupSettings, ByCmd %IDM_6, %MFS_Checked Or %MFS_Enabled
    End Select
 
End Sub
   
'gbs_01340
'Date: 05-11-2013                     

created by gbSnippets
http://www.garybeene.com/sw/gbsnippets.htm