AkelPad

Code: Select all

// Active column show/hide for menu.
// How to use:
// Add item to ContextMenu plugin:
// -"Active column" Call("Scripts::Main", 1, "ActiveColumnSwitchForMenu.js", `"%m" "%i"`)

//Arguments
var hMenu=0;
var nItemID=0;
if (WScript.Arguments.length >= 2)
{
  hMenu=parseInt(WScript.Arguments(0));
  nItemID=parseInt(WScript.Arguments(1));
}

var hMainWnd=AkelPad.GetMainWnd();
var hWndEdit=AkelPad.GetEditWnd();
var dwOptions;

if (hMainWnd && hWndEdit)
{
  dwOptions=AkelPad.SendMessage(hWndEdit, 3227 /*AEM_GETOPTIONS*/, 0, 0);

  if (dwOptions & 0x400 /*AECO_ACTIVECOLUMN*/)
  {
    AkelPad.SendMessage(hWndEdit, 3228 /*AEM_SETOPTIONS*/, 4 /*AECOOP_XOR*/, 0x400 /*AECO_ACTIVECOLUMN*/);
    AkelPad.SystemFunction().Call("User32::CheckMenuItem", hMenu, nItemID, 0x0 /*MF_BYCOMMAND|MF_UNCHECKED*/);
  }
  else
  {
    AkelPad.SendMessage(hWndEdit, 3228 /*AEM_SETOPTIONS*/, 2 /*AECOOP_OR*/, 0x400 /*AECO_ACTIVECOLUMN*/);
    AkelPad.SystemFunction().Call("User32::CheckMenuItem", hMenu, nItemID, 0x8 /*MF_BYCOMMAND|MF_CHECKED*/);
  }
}